home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2004 September / maximum-cd-2004-09.iso / Software / Apps / CorelDRAWGraphicsSuite12.exe / CorelDRAW Graphics Suite 12.msi / Binary.NewBinary27 < prev    next >
Encoding:
Text File  |  2004-01-07  |  83.7 KB  |  1,800 lines
  1. Const msiNoAction = -1
  2. Const msiInstallStateAdvertise = 1
  3. Const msiInstallStateAbsent = 2
  4. Const msiInstallStateLocal = 3
  5. Const msiInstallStateSource = 4
  6. Const msiInstallStateDefault = 5
  7. Dim nRemoveVBAEN:nRemoveVBAEN = 0
  8. Dim nRemoveVBACZ:nRemoveVBACZ = 0
  9. Dim nRemoveVBANL:nRemoveVBAPL = 0
  10.  
  11. On Error Resume Next
  12.  
  13. If (Session.FeatureRequestState("MainApplications") = msiInstallStateSource) Then
  14.     Session.FeatureRequestState("InvisibleFeatures") = msiInstallStateSource
  15. Elseif (Session.FeatureRequestState("MainApplications") = msiInstallStateLocal) Then
  16.     Session.FeatureRequestState("InvisibleFeatures") = msiInstallStateLocal
  17. End If
  18. If (Session.FeatureRequestState("WritingTools") = msiInstallStateSource) Then
  19.     Session.FeatureRequestState("InvisibleWTFeatures") = msiInstallStateSource
  20. Elseif (Session.FeatureRequestState("WritingTools") = msiInstallStateLocal) Then
  21.     Session.FeatureRequestState("InvisibleWTFeatures") = msiInstallStateLocal
  22. End If
  23.     
  24.  
  25. If (IsFeatureExists("EN") = 1) Then
  26.     If ((Session.Property("OSLANGUAGE") = "US") Or (Session.Property("ProductLanguage") = "1033")) Then
  27.         Session.FeatureRequestState("RequiredEN") = msiInstallStateLocal
  28.         Session.FeatureRequestState("RegistrationEN") = msiInstallStateLocal
  29.     End if
  30.     If (Session.Property("ENLANG") = "1") Then
  31.         Session.FeatureRequestState("RequiredEN") = msiInstallStateLocal
  32.         If (IsFeatureSelected("MainApplications") = True) Then
  33.             Session.FeatureRequestState("EN") = msiInstallStateLocal
  34.         End If
  35.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  36.             Session.FeatureRequestState("VBAEN") = msiInstallStateLocal
  37.         Else
  38.             nRemoveVBAEN = 1
  39.         End If
  40.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  41.             Session.FeatureRequestState("English") = msiInstallStateLocal
  42.             Session.FeatureRequestState("DrawProgFilesRequiredEN") = msiInstallStateLocal
  43.         Else
  44.             Session.FeatureRequestState("DrawProgFilesRequiredEN") = msiInstallStateAbsent
  45.         End If
  46.         If (IsFeatureSelected(("WritingTools")) = True) Then
  47.             Session.FeatureRequestState("WT4ENLANG") = msiInstallStateLocal
  48.         Else
  49.             Session.FeatureRequestState("WT4ENLANG") = msiInstallStateAbsent
  50.         End If
  51.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  52.             Session.FeatureRequestState("DrawHelpEN") = msiInstallStateLocal
  53.         Else
  54.             Session.FeatureRequestState("DrawHelpEN") = msiInstallStateAbsent
  55.         End If
  56.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  57.             Session.FeatureRequestState("PPProgFilesRequiredEN") = msiInstallStateLocal
  58.         Else
  59.             Session.FeatureRequestState("PPProgFilesRequiredEN") = msiInstallStateAbsent
  60.         End If
  61.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  62.             Session.FeatureRequestState("PPHelpEN") = msiInstallStateLocal
  63.         Else
  64.             Session.FeatureRequestState("PPHelpEN") = msiInstallStateAbsent
  65.         End If
  66.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  67.             Session.FeatureRequestState("RaveProgFilesRequiredEN") = msiInstallStateLocal
  68.         Else
  69.             Session.FeatureRequestState("RaveProgFilesRequiredEN") = msiInstallStateAbsent
  70.         End If
  71.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  72.             Session.FeatureRequestState("RaveHelpEN") = msiInstallStateLocal
  73.         Else
  74.             Session.FeatureRequestState("RaveHelpEN") = msiInstallStateAbsent
  75.         End If
  76.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  77.             Session.FeatureRequestState("TraceHelpEN") = msiInstallStateLocal
  78.         Else
  79.             Session.FeatureRequestState("TraceHelpEN") = msiInstallStateAbsent
  80.         End If
  81.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  82.             Session.FeatureRequestState("CaptureHelpEN") = msiInstallStateLocal
  83.         Else
  84.             Session.FeatureRequestState("CaptureHelpEN") = msiInstallStateAbsent
  85.         End If
  86.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  87.             Session.FeatureRequestState("BarcodeHelpEN") = msiInstallStateLocal
  88.         Else
  89.             Session.FeatureRequestState("BarcodeHelpEN") = msiInstallStateAbsent
  90.         End If
  91.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  92.             Session.FeatureRequestState("DrawPresetsEN") = msiInstallStateLocal
  93.         Else
  94.             Session.FeatureRequestState("DrawPresetsEN") = msiInstallStateAbsent
  95.         End If
  96.         If (IsFeatureSelected(("RavePresets")) = True) Then
  97.             Session.FeatureRequestState("RavePresetsEN") = msiInstallStateLocal
  98.         Else
  99.             Session.FeatureRequestState("RavePresetsEN") = msiInstallStateAbsent
  100.         End If
  101.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  102.             Session.FeatureRequestState("PPPresetsEN") = msiInstallStateLocal
  103.         Else
  104.             Session.FeatureRequestState("PPPresetsEN") = msiInstallStateAbsent
  105.         End If
  106.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  107.             Session.FeatureRequestState("DrawTutorsEN") = msiInstallStateLocal
  108.         Else
  109.             Session.FeatureRequestState("DrawTutorsEN") = msiInstallStateAbsent
  110.         End If
  111.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  112.             Session.FeatureRequestState("RaveTutorsEN") = msiInstallStateLocal
  113.         Else
  114.             Session.FeatureRequestState("RaveTutorsEN") = msiInstallStateAbsent
  115.         End If
  116.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  117.             Session.FeatureRequestState("PPTutorsEN") = msiInstallStateLocal
  118.         Else
  119.             Session.FeatureRequestState("PPTutorsEN") = msiInstallStateAbsent
  120.         End If
  121.         If (IsFeatureSelected(("UserGuide")) = True) Then
  122.             Session.FeatureRequestState("UserGuideEN") = msiInstallStateLocal
  123.         Else
  124.             Session.FeatureRequestState("UserGuideEN") = msiInstallStateAbsent
  125.         End If
  126.     Else
  127.         Session.FeatureRequestState("EN") = msiInstallStateAbsent
  128.         nRemoveVBAEN = 1
  129.         Session.FeatureRequestState("UserGuideEN") = msiInstallStateAbsent
  130.         Session.FeatureRequestState("DrawProgFilesRequiredEN") = msiInstallStateAbsent
  131.         Session.FeatureRequestState("PPProgFilesRequiredEN") = msiInstallStateAbsent
  132.         Session.FeatureRequestState("RaveProgFilesRequiredEN") = msiInstallStateAbsent
  133.         Session.FeatureRequestState("WT4ENLANG") = msiInstallStateAbsent
  134.         Session.FeatureRequestState("DrawHelpEN") = msiInstallStateAbsent
  135.         Session.FeatureRequestState("PPHelpEN") = msiInstallStateAbsent
  136.         Session.FeatureRequestState("RaveHelpEN") = msiInstallStateAbsent
  137.         Session.FeatureRequestState("TraceHelpEN") = msiInstallStateAbsent
  138.         Session.FeatureRequestState("CaptureHelpEN") = msiInstallStateAbsent
  139.         Session.FeatureRequestState("BarcodeHelpEN") = msiInstallStateAbsent
  140.         Session.FeatureRequestState("DrawPresetsEN") = msiInstallStateAbsent
  141.         Session.FeatureRequestState("RavePresetsEN") = msiInstallStateAbsent
  142.         Session.FeatureRequestState("PPPresetsEN") = msiInstallStateAbsent
  143.         Session.FeatureRequestState("DrawTutorsEN") = msiInstallStateAbsent
  144.         Session.FeatureRequestState("RaveTutorsEN") = msiInstallStateAbsent
  145.         Session.FeatureRequestState("PPTutorsEN") = msiInstallStateAbsent
  146.         If ((Session.Property("OSLANGUAGE") <> "US") And (Session.Property("ProductLanguage") <> "1033")) Then
  147.             Session.FeatureRequestState("RequiredEN") = msiInstallStateAbsent
  148.             Session.FeatureRequestState("RegistrationEN") = msiInstallStateAbsent
  149.         End If
  150.     End If
  151. Else
  152.     nRemoveVBAEN = 1
  153. End If
  154. If (IsFeatureExists("FR") = 1) Then
  155.     If ((Session.Property("OSLANGUAGE") = "FR") Or (Session.Property("ProductLanguage") = "1036")) Then
  156.         Session.FeatureRequestState("RequiredFR") = msiInstallStateLocal
  157.         Session.FeatureRequestState("RegistrationFR") = msiInstallStateLocal
  158.     End If
  159.     If (Session.Property("FRLANG") = "1") Then
  160.         Session.FeatureRequestState("RequiredFR") = msiInstallStateLocal
  161.         If (IsFeatureSelected("MainApplications") = True) Then
  162.             Session.FeatureRequestState("FR") = msiInstallStateLocal
  163.         End If
  164.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  165.             Session.FeatureRequestState("VBAFR") = msiInstallStateLocal
  166.         Else
  167.             Session.FeatureRequestState("VBAFR") = msiInstallStateAbsent
  168.         End If
  169.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  170.             Session.FeatureRequestState("French") = msiInstallStateLocal
  171.             Session.FeatureRequestState("DrawProgFilesRequiredFR") = msiInstallStateLocal
  172.         Else
  173.             Session.FeatureRequestState("DrawProgFilesRequiredFR") = msiInstallStateAbsent
  174.         End If
  175.         If (IsFeatureSelected(("WritingTools")) = True) Then
  176.             Session.FeatureRequestState("WT4FRLANG") = msiInstallStateLocal
  177.         Else
  178.             Session.FeatureRequestState("WT4FRLANG") = msiInstallStateAbsent
  179.         End If
  180.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  181.             Session.FeatureRequestState("DrawHelpFR") = msiInstallStateLocal
  182.         Else
  183.             Session.FeatureRequestState("DrawHelpFR") = msiInstallStateAbsent
  184.         End If
  185.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  186.             Session.FeatureRequestState("PPProgFilesRequiredFR") = msiInstallStateLocal
  187.         Else
  188.             Session.FeatureRequestState("PPProgFilesRequiredFR") = msiInstallStateAbsent
  189.         End If
  190.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  191.             Session.FeatureRequestState("PPHelpFR") = msiInstallStateLocal
  192.         Else
  193.             Session.FeatureRequestState("PPHelpFR") = msiInstallStateAbsent
  194.         End If
  195.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  196.             Session.FeatureRequestState("RaveProgFilesRequiredFR") = msiInstallStateLocal
  197.         Else
  198.             Session.FeatureRequestState("RaveProgFilesRequiredFR") = msiInstallStateAbsent
  199.         End If
  200.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  201.             Session.FeatureRequestState("RaveHelpFR") = msiInstallStateLocal
  202.         Else
  203.             Session.FeatureRequestState("RaveHelpFR") = msiInstallStateAbsent
  204.         End If
  205.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  206.             Session.FeatureRequestState("TraceHelpFR") = msiInstallStateLocal
  207.         Else
  208.             Session.FeatureRequestState("TraceHelpFR") = msiInstallStateAbsent
  209.         End If
  210.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  211.             Session.FeatureRequestState("CaptureHelpFR") = msiInstallStateLocal
  212.         Else
  213.             Session.FeatureRequestState("CaptureHelpFR") = msiInstallStateAbsent
  214.         End If
  215.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  216.             Session.FeatureRequestState("BarcodeHelpFR") = msiInstallStateLocal
  217.         Else
  218.             Session.FeatureRequestState("BarcodeHelpFR") = msiInstallStateAbsent
  219.         End If
  220.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  221.             Session.FeatureRequestState("DrawPresetsFR") = msiInstallStateLocal
  222.         Else
  223.             Session.FeatureRequestState("DrawPresetsFR") = msiInstallStateAbsent
  224.         End If
  225.         If (IsFeatureSelected(("RavePresets")) = True) Then
  226.             Session.FeatureRequestState("RavePresetsFR") = msiInstallStateLocal
  227.         Else
  228.             Session.FeatureRequestState("RavePresetsFR") = msiInstallStateAbsent
  229.         End If
  230.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  231.             Session.FeatureRequestState("PPPresetsFR") = msiInstallStateLocal
  232.         Else
  233.             Session.FeatureRequestState("PPPresetsFR") = msiInstallStateAbsent
  234.         End If
  235.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  236.             Session.FeatureRequestState("DrawTutorsFR") = msiInstallStateLocal
  237.         Else
  238.             Session.FeatureRequestState("DrawTutorsFR") = msiInstallStateAbsent
  239.         End If
  240.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  241.             Session.FeatureRequestState("RaveTutorsFR") = msiInstallStateLocal
  242.         Else
  243.             Session.FeatureRequestState("RaveTutorsFR") = msiInstallStateAbsent
  244.         End If
  245.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  246.             Session.FeatureRequestState("PPTutorsFR") = msiInstallStateLocal
  247.         Else
  248.             Session.FeatureRequestState("PPTutorsFR") = msiInstallStateAbsent
  249.         End If
  250.         If (IsFeatureSelected(("UserGuide")) = True) Then
  251.             Session.FeatureRequestState("UserGuideFR") = msiInstallStateLocal
  252.         Else
  253.             Session.FeatureRequestState("UserGuideFR") = msiInstallStateAbsent
  254.         End If
  255.     Else
  256.         Session.FeatureRequestState("FR") = msiInstallStateAbsent
  257.         Session.FeatureRequestState("UserGuideFR") = msiInstallStateAbsent
  258.         Session.FeatureRequestState("DrawProgFilesRequiredFR") = msiInstallStateAbsent
  259.         Session.FeatureRequestState("PPProgFilesRequiredFR") = msiInstallStateAbsent
  260.         Session.FeatureRequestState("RaveProgFilesRequiredFR") = msiInstallStateAbsent
  261.         Session.FeatureRequestState("VBAFR") = msiInstallStateAbsent
  262.         Session.FeatureRequestState("WT4FRLANG") = msiInstallStateAbsent
  263.         Session.FeatureRequestState("DrawHelpFR") = msiInstallStateAbsent
  264.         Session.FeatureRequestState("PPHelpFR") = msiInstallStateAbsent
  265.         Session.FeatureRequestState("RaveHelpFR") = msiInstallStateAbsent
  266.         Session.FeatureRequestState("TraceHelpFR") = msiInstallStateAbsent
  267.         Session.FeatureRequestState("CaptureHelpFR") = msiInstallStateAbsent
  268.         Session.FeatureRequestState("BarcodeHelpFR") = msiInstallStateAbsent
  269.         Session.FeatureRequestState("DrawPresetsFR") = msiInstallStateAbsent
  270.         Session.FeatureRequestState("RavePresetsFR") = msiInstallStateAbsent
  271.         Session.FeatureRequestState("PPPresetsFR") = msiInstallStateAbsent
  272.         Session.FeatureRequestState("DrawTutorsFR") = msiInstallStateAbsent
  273.         Session.FeatureRequestState("RaveTutorsFR") = msiInstallStateAbsent
  274.         Session.FeatureRequestState("PPTutorsFR") = msiInstallStateAbsent
  275.         If ((Session.Property("OSLANGUAGE") <> "FR") And (Session.Property("ProductLanguage") <> "1036")) Then
  276.             Session.FeatureRequestState("RequiredFR") = msiInstallStateAbsent
  277.             Session.FeatureRequestState("RegistrationFR") = msiInstallStateAbsent
  278.         End If
  279.     End If
  280. End If
  281. If (IsFeatureExists("DE") = 1) Then
  282.     If ((Session.Property("OSLANGUAGE") = "DE") Or (Session.Property("ProductLanguage") = "1031")) Then
  283.         Session.FeatureRequestState("RequiredDE") = msiInstallStateLocal
  284.         Session.FeatureRequestState("RegistrationDE") = msiInstallStateLocal
  285.     End If
  286.     If (Session.Property("DELANG") = "1") Then
  287.         Session.FeatureRequestState("RequiredDE") = msiInstallStateLocal
  288.         If (IsFeatureSelected("MainApplications") = True) Then
  289.             Session.FeatureRequestState("DE") = msiInstallStateLocal
  290.         End If
  291.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  292.             Session.FeatureRequestState("VBADE") = msiInstallStateLocal
  293.         Else
  294.             Session.FeatureRequestState("VBADE") = msiInstallStateAbsent
  295.         End If
  296.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  297.             Session.FeatureRequestState("German") = msiInstallStateLocal
  298.             Session.FeatureRequestState("DrawProgFilesRequiredDE") = msiInstallStateLocal
  299.         Else
  300.             Session.FeatureRequestState("DrawProgFilesRequiredDE") = msiInstallStateAbsent
  301.         End If
  302.         If (IsFeatureSelected(("WritingTools")) = True) Then
  303.             Session.FeatureRequestState("WT4DELANG") = msiInstallStateLocal
  304.         Else
  305.             Session.FeatureRequestState("WT4DELANG") = msiInstallStateAbsent
  306.         End If
  307.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  308.             Session.FeatureRequestState("DrawHelpDE") = msiInstallStateLocal
  309.         Else
  310.             Session.FeatureRequestState("DrawHelpDE") = msiInstallStateAbsent
  311.         End If
  312.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  313.             Session.FeatureRequestState("PPProgFilesRequiredDE") = msiInstallStateLocal
  314.         Else
  315.             Session.FeatureRequestState("PPProgFilesRequiredDE") = msiInstallStateAbsent
  316.         End If
  317.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  318.             Session.FeatureRequestState("PPHelpDE") = msiInstallStateLocal
  319.         Else
  320.             Session.FeatureRequestState("PPHelpDE") = msiInstallStateAbsent
  321.         End If
  322.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  323.             Session.FeatureRequestState("RaveProgFilesRequiredDE") = msiInstallStateLocal
  324.         Else
  325.             Session.FeatureRequestState("RaveProgFilesRequiredDE") = msiInstallStateAbsent
  326.         End If
  327.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  328.             Session.FeatureRequestState("RaveHelpDE") = msiInstallStateLocal
  329.         Else
  330.             Session.FeatureRequestState("RaveHelpDE") = msiInstallStateAbsent
  331.         End If
  332.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  333.             Session.FeatureRequestState("TraceHelpDE") = msiInstallStateLocal
  334.         Else
  335.             Session.FeatureRequestState("TraceHelpDE") = msiInstallStateAbsent
  336.         End If
  337.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  338.             Session.FeatureRequestState("CaptureHelpDE") = msiInstallStateLocal
  339.         Else
  340.             Session.FeatureRequestState("CaptureHelpDE") = msiInstallStateAbsent
  341.         End If
  342.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  343.             Session.FeatureRequestState("BarcodeHelpDE") = msiInstallStateLocal
  344.         Else
  345.             Session.FeatureRequestState("BarcodeHelpDE") = msiInstallStateAbsent
  346.         End If
  347.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  348.             Session.FeatureRequestState("DrawPresetsDE") = msiInstallStateLocal
  349.         Else
  350.             Session.FeatureRequestState("DrawPresetsDE") = msiInstallStateAbsent
  351.         End If
  352.         If (IsFeatureSelected(("RavePresets")) = True) Then
  353.             Session.FeatureRequestState("RavePresetsDE") = msiInstallStateLocal
  354.         Else
  355.             Session.FeatureRequestState("RavePresetsDE") = msiInstallStateAbsent
  356.         End If
  357.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  358.             Session.FeatureRequestState("PPPresetsDE") = msiInstallStateLocal
  359.         Else
  360.             Session.FeatureRequestState("PPPresetsDE") = msiInstallStateAbsent
  361.         End If
  362.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  363.             Session.FeatureRequestState("DrawTutorsDE") = msiInstallStateLocal
  364.         Else
  365.             Session.FeatureRequestState("DrawTutorsDE") = msiInstallStateAbsent
  366.         End If
  367.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  368.             Session.FeatureRequestState("RaveTutorsDE") = msiInstallStateLocal
  369.         Else
  370.             Session.FeatureRequestState("RaveTutorsDE") = msiInstallStateAbsent
  371.         End If
  372.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  373.             Session.FeatureRequestState("PPTutorsDE") = msiInstallStateLocal
  374.         Else
  375.             Session.FeatureRequestState("PPTutorsDE") = msiInstallStateAbsent
  376.         End If
  377.         If (IsFeatureSelected(("UserGuide")) = True) Then
  378.             Session.FeatureRequestState("UserGuideDE") = msiInstallStateLocal
  379.         Else
  380.             Session.FeatureRequestState("UserGuideDE") = msiInstallStateAbsent
  381.         End If
  382.     Else
  383.         Session.FeatureRequestState("DE") = msiInstallStateAbsent
  384.         Session.FeatureRequestState("UserGuideDE") = msiInstallStateAbsent
  385.         Session.FeatureRequestState("VBADE") = msiInstallStateAbsent
  386.         Session.FeatureRequestState("DrawProgFilesRequiredDE") = msiInstallStateAbsent
  387.         Session.FeatureRequestState("PPProgFilesRequiredDE") = msiInstallStateAbsent
  388.         Session.FeatureRequestState("RaveProgFilesRequiredDE") = msiInstallStateAbsent
  389.         Session.FeatureRequestState("WT4DELANG") = msiInstallStateAbsent
  390.         Session.FeatureRequestState("DrawHelpDE") = msiInstallStateAbsent
  391.         Session.FeatureRequestState("PPHelpDE") = msiInstallStateAbsent
  392.         Session.FeatureRequestState("RaveHelpDE") = msiInstallStateAbsent
  393.         Session.FeatureRequestState("TraceHelpDE") = msiInstallStateAbsent
  394.         Session.FeatureRequestState("CaptureHelpDE") = msiInstallStateAbsent
  395.         Session.FeatureRequestState("BarcodeHelpDE") = msiInstallStateAbsent
  396.         Session.FeatureRequestState("DrawPresetsDE") = msiInstallStateAbsent
  397.         Session.FeatureRequestState("RavePresetsDE") = msiInstallStateAbsent
  398.         Session.FeatureRequestState("PPPresetsDE") = msiInstallStateAbsent
  399.         Session.FeatureRequestState("DrawTutorsDE") = msiInstallStateAbsent
  400.         Session.FeatureRequestState("RaveTutorsDE") = msiInstallStateAbsent
  401.         Session.FeatureRequestState("PPTutorsDE") = msiInstallStateAbsent
  402.         If ((Session.Property("OSLANGUAGE") <> "DE") And (Session.Property("ProductLanguage") <> "1031")) Then
  403.             Session.FeatureRequestState("RequiredDE") = msiInstallStateAbsent
  404.             Session.FeatureRequestState("RegistrationDE") = msiInstallStateAbsent
  405.         End If
  406.     End If
  407. End If
  408. If (IsFeatureExists("JP") = 1) Then
  409.     If ((Session.Property("OSLANGUAGE") = "JP") Or (Session.Property("ProductLanguage") = "1041")) Then
  410.         Session.FeatureRequestState("RequiredJP") = msiInstallStateLocal
  411.         Session.FeatureRequestState("RegistrationJP") = msiInstallStateLocal
  412.     End If
  413.     If (Session.Property("JPLANG") = "1") Then
  414.         Session.FeatureRequestState("RequiredJP") = msiInstallStateLocal
  415.         If (IsFeatureSelected("MainApplications") = True) Then
  416.             Session.FeatureRequestState("JP") = msiInstallStateLocal
  417.         End If
  418.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  419.             Session.FeatureRequestState("VBAJP") = msiInstallStateLocal
  420.         Else
  421.             Session.FeatureRequestState("VBAJP") = msiInstallStateAbsent
  422.         End If
  423.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  424.             Session.FeatureRequestState("Japanese") = msiInstallStateLocal
  425.             Session.FeatureRequestState("DrawProgFilesRequiredJP") = msiInstallStateLocal
  426.         Else
  427.             Session.FeatureRequestState("DrawProgFilesRequiredJP") = msiInstallStateAbsent
  428.         End If
  429.         If (IsFeatureSelected(("WritingTools")) = True) Then
  430.             Session.FeatureRequestState("WT4JPLANG") = msiInstallStateLocal
  431.         Else
  432.             Session.FeatureRequestState("WT4JPLANG") = msiInstallStateAbsent
  433.         End If
  434.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  435.             Session.FeatureRequestState("DrawHelpJP") = msiInstallStateLocal
  436.         Else
  437.             Session.FeatureRequestState("DrawHelpJP") = msiInstallStateAbsent
  438.         End If
  439.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  440.             Session.FeatureRequestState("PPProgFilesRequiredJP") = msiInstallStateLocal
  441.         Else
  442.             Session.FeatureRequestState("PPProgFilesRequiredJP") = msiInstallStateAbsent
  443.         End If
  444.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  445.             Session.FeatureRequestState("PPHelpJP") = msiInstallStateLocal
  446.         Else
  447.             Session.FeatureRequestState("PPHelpJP") = msiInstallStateAbsent
  448.         End If
  449.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  450.             Session.FeatureRequestState("RaveProgFilesRequiredJP") = msiInstallStateLocal
  451.         Else
  452.             Session.FeatureRequestState("RaveProgFilesRequiredJP") = msiInstallStateAbsent
  453.         End If
  454.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  455.             Session.FeatureRequestState("RaveHelpJP") = msiInstallStateLocal
  456.         Else
  457.             Session.FeatureRequestState("RaveHelpJP") = msiInstallStateAbsent
  458.         End If
  459.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  460.             Session.FeatureRequestState("TraceHelpJP") = msiInstallStateLocal
  461.         Else
  462.             Session.FeatureRequestState("TraceHelpJP") = msiInstallStateAbsent
  463.         End If
  464.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  465.             Session.FeatureRequestState("CaptureHelpJP") = msiInstallStateLocal
  466.         Else
  467.             Session.FeatureRequestState("CaptureHelpJP") = msiInstallStateAbsent
  468.         End If
  469.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  470.             Session.FeatureRequestState("BarcodeHelpJP") = msiInstallStateLocal
  471.         Else
  472.             Session.FeatureRequestState("BarcodeHelpJP") = msiInstallStateAbsent
  473.         End If
  474.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  475.             Session.FeatureRequestState("DrawPresetsJP") = msiInstallStateLocal
  476.         Else
  477.             Session.FeatureRequestState("DrawPresetsJP") = msiInstallStateAbsent
  478.         End If
  479.         If (IsFeatureSelected(("RavePresets")) = True) Then
  480.             Session.FeatureRequestState("RavePresetsJP") = msiInstallStateLocal
  481.         Else
  482.             Session.FeatureRequestState("RavePresetsJP") = msiInstallStateAbsent
  483.         End If
  484.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  485.             Session.FeatureRequestState("PPPresetsJP") = msiInstallStateLocal
  486.         Else
  487.             Session.FeatureRequestState("PPPresetsJP") = msiInstallStateAbsent
  488.         End If
  489.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  490.             Session.FeatureRequestState("DrawTutorsJP") = msiInstallStateLocal
  491.         Else
  492.             Session.FeatureRequestState("DrawTutorsJP") = msiInstallStateAbsent
  493.         End If
  494.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  495.             Session.FeatureRequestState("RaveTutorsJP") = msiInstallStateLocal
  496.         Else
  497.             Session.FeatureRequestState("RaveTutorsJP") = msiInstallStateAbsent
  498.         End If
  499.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  500.             Session.FeatureRequestState("PPTutorsJP") = msiInstallStateLocal
  501.         Else
  502.             Session.FeatureRequestState("PPTutorsJP") = msiInstallStateAbsent
  503.         End If
  504.         If (IsFeatureSelected(("UserGuide")) = True) Then
  505.             Session.FeatureRequestState("UserGuideJP") = msiInstallStateLocal
  506.         Else
  507.             Session.FeatureRequestState("UserGuideJP") = msiInstallStateAbsent
  508.         End If
  509.     Else
  510.         Session.FeatureRequestState("JP") = msiInstallStateAbsent
  511.         Session.FeatureRequestState("UserGuideJP") = msiInstallStateAbsent
  512.         Session.FeatureRequestState("DrawProgFilesRequiredJP") = msiInstallStateAbsent
  513.         Session.FeatureRequestState("PPProgFilesRequiredJP") = msiInstallStateAbsent
  514.         Session.FeatureRequestState("RaveProgFilesRequiredJP") = msiInstallStateAbsent
  515.         Session.FeatureRequestState("VBAJP") = msiInstallStateAbsent
  516.         Session.FeatureRequestState("WT4JPLANG") = msiInstallStateAbsent
  517.         Session.FeatureRequestState("DrawHelpJP") = msiInstallStateAbsent
  518.         Session.FeatureRequestState("PPHelpJP") = msiInstallStateAbsent
  519.         Session.FeatureRequestState("RaveHelpJP") = msiInstallStateAbsent
  520.         Session.FeatureRequestState("TraceHelpJP") = msiInstallStateAbsent
  521.         Session.FeatureRequestState("CaptureHelpJP") = msiInstallStateAbsent
  522.         Session.FeatureRequestState("BarcodeHelpJP") = msiInstallStateAbsent
  523.         Session.FeatureRequestState("DrawPresetsJP") = msiInstallStateAbsent
  524.         Session.FeatureRequestState("RavePresetsJP") = msiInstallStateAbsent
  525.         Session.FeatureRequestState("PPPresetsJP") = msiInstallStateAbsent
  526.         Session.FeatureRequestState("DrawTutorsJP") = msiInstallStateAbsent
  527.         Session.FeatureRequestState("RaveTutorsJP") = msiInstallStateAbsent
  528.         Session.FeatureRequestState("PPTutorsJP") = msiInstallStateAbsent
  529.         If ((Session.Property("OSLANGUAGE") <> "JP") And (Session.Property("ProductLanguage") <> "1041")) Then
  530.             Session.FeatureRequestState("RequiredJP") = msiInstallStateAbsent
  531.             Session.FeatureRequestState("RegistrationJP") = msiInstallStateAbsent
  532.         End If
  533.     End If
  534. End If
  535. If (IsFeatureExists("IT") = 1) Then
  536.     If ((Session.Property("OSLANGUAGE") = "IT") Or (Session.Property("ProductLanguage") = "1040")) Then
  537.         Session.FeatureRequestState("RequiredIT") = msiInstallStateLocal
  538.         Session.FeatureRequestState("RegistrationIT") = msiInstallStateLocal
  539.     End If
  540.     If (Session.Property("ITLANG") = "1") Then
  541.         Session.FeatureRequestState("RequiredIT") = msiInstallStateLocal
  542.         If (IsFeatureSelected("MainApplications") = True) Then
  543.             Session.FeatureRequestState("IT") = msiInstallStateLocal
  544.         End If
  545.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  546.             Session.FeatureRequestState("VBAIT") = msiInstallStateLocal
  547.         Else
  548.             Session.FeatureRequestState("VBAIT") = msiInstallStateAbsent
  549.         End If
  550.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  551.             Session.FeatureRequestState("Italian") = msiInstallStateLocal
  552.             Session.FeatureRequestState("DrawProgFilesRequiredIT") = msiInstallStateLocal
  553.         Else
  554.             Session.FeatureRequestState("DrawProgFilesRequiredIT") = msiInstallStateAbsent
  555.         End If
  556.         If (IsFeatureSelected(("WritingTools")) = True) Then
  557.             Session.FeatureRequestState("WT4ITLANG") = msiInstallStateLocal
  558.         Else
  559.             Session.FeatureRequestState("WT4ITLANG") = msiInstallStateAbsent
  560.         End If
  561.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  562.             Session.FeatureRequestState("DrawHelpIT") = msiInstallStateLocal
  563.         Else
  564.             Session.FeatureRequestState("DrawHelpIT") = msiInstallStateAbsent
  565.         End If
  566.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  567.             Session.FeatureRequestState("PPProgFilesRequiredIT") = msiInstallStateLocal
  568.         Else
  569.             Session.FeatureRequestState("PPProgFilesRequiredIT") = msiInstallStateAbsent
  570.         End If
  571.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  572.             Session.FeatureRequestState("PPHelpIT") = msiInstallStateLocal
  573.         Else
  574.             Session.FeatureRequestState("PPHelpIT") = msiInstallStateAbsent
  575.         End If
  576.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  577.             Session.FeatureRequestState("RaveProgFilesRequiredIT") = msiInstallStateLocal
  578.         Else
  579.             Session.FeatureRequestState("RaveProgFilesRequiredIT") = msiInstallStateAbsent
  580.         End If
  581.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  582.             Session.FeatureRequestState("RaveHelpIT") = msiInstallStateLocal
  583.         Else
  584.             Session.FeatureRequestState("RaveHelpIT") = msiInstallStateAbsent
  585.         End If
  586.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  587.             Session.FeatureRequestState("TraceHelpIT") = msiInstallStateLocal
  588.         Else
  589.             Session.FeatureRequestState("TraceHelpIT") = msiInstallStateAbsent
  590.         End If
  591.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  592.             Session.FeatureRequestState("CaptureHelpIT") = msiInstallStateLocal
  593.         Else
  594.             Session.FeatureRequestState("CaptureHelpIT") = msiInstallStateAbsent
  595.         End If
  596.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  597.             Session.FeatureRequestState("BarcodeHelpIT") = msiInstallStateLocal
  598.         Else
  599.             Session.FeatureRequestState("BarcodeHelpIT") = msiInstallStateAbsent
  600.         End If
  601.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  602.             Session.FeatureRequestState("DrawPresetsIT") = msiInstallStateLocal
  603.         Else
  604.             Session.FeatureRequestState("DrawPresetsIT") = msiInstallStateAbsent
  605.         End If
  606.         If (IsFeatureSelected(("RavePresets")) = True) Then
  607.             Session.FeatureRequestState("RavePresetsIT") = msiInstallStateLocal
  608.         Else
  609.             Session.FeatureRequestState("RavePresetsIT") = msiInstallStateAbsent
  610.         End If
  611.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  612.             Session.FeatureRequestState("PPPresetsIT") = msiInstallStateLocal
  613.         Else
  614.             Session.FeatureRequestState("PPPresetsIT") = msiInstallStateAbsent
  615.         End If
  616.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  617.             Session.FeatureRequestState("DrawTutorsIT") = msiInstallStateLocal
  618.         Else
  619.             Session.FeatureRequestState("DrawTutorsIT") = msiInstallStateAbsent
  620.         End If
  621.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  622.             Session.FeatureRequestState("RaveTutorsIT") = msiInstallStateLocal
  623.         Else
  624.             Session.FeatureRequestState("RaveTutorsIT") = msiInstallStateAbsent
  625.         End If
  626.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  627.             Session.FeatureRequestState("PPTutorsIT") = msiInstallStateLocal
  628.         Else
  629.             Session.FeatureRequestState("PPTutorsIT") = msiInstallStateAbsent
  630.         End If
  631.         If (IsFeatureSelected(("UserGuide")) = True) Then
  632.             Session.FeatureRequestState("UserGuideIT") = msiInstallStateLocal
  633.         Else
  634.             Session.FeatureRequestState("UserGuideIT") = msiInstallStateAbsent
  635.         End If
  636.     Else
  637.         Session.FeatureRequestState("IT") = msiInstallStateAbsent
  638.         Session.FeatureRequestState("UserGuideIT") = msiInstallStateAbsent
  639.         Session.FeatureRequestState("VBAIT") = msiInstallStateAbsent
  640.         Session.FeatureRequestState("DrawProgFilesRequiredIT") = msiInstallStateAbsent
  641.         Session.FeatureRequestState("PPProgFilesRequiredIT") = msiInstallStateAbsent
  642.         Session.FeatureRequestState("RaveProgFilesRequiredIT") = msiInstallStateAbsent
  643.         Session.FeatureRequestState("WT4ITLANG") = msiInstallStateAbsent
  644.         Session.FeatureRequestState("DrawHelpIT") = msiInstallStateAbsent
  645.         Session.FeatureRequestState("PPHelpIT") = msiInstallStateAbsent
  646.         Session.FeatureRequestState("RaveHelpIT") = msiInstallStateAbsent
  647.         Session.FeatureRequestState("TraceHelpIT") = msiInstallStateAbsent
  648.         Session.FeatureRequestState("CaptureHelpIT") = msiInstallStateAbsent
  649.         Session.FeatureRequestState("BarcodeHelpIT") = msiInstallStateAbsent
  650.         Session.FeatureRequestState("DrawPresetsIT") = msiInstallStateAbsent
  651.         Session.FeatureRequestState("RavePresetsIT") = msiInstallStateAbsent
  652.         Session.FeatureRequestState("PPPresetsIT") = msiInstallStateAbsent
  653.         Session.FeatureRequestState("DrawTutorsIT") = msiInstallStateAbsent
  654.         Session.FeatureRequestState("RaveTutorsIT") = msiInstallStateAbsent
  655.         Session.FeatureRequestState("PPTutorsIT") = msiInstallStateAbsent
  656.         If ((Session.Property("OSLANGUAGE") <> "IT") And (Session.Property("ProductLanguage") <> "1040")) Then
  657.             Session.FeatureRequestState("RequiredIT") = msiInstallStateAbsent
  658.             Session.FeatureRequestState("RegistrationIT") = msiInstallStateAbsent
  659.         End If
  660.     End If
  661. End If
  662. If (IsFeatureExists("ES") = 1) Then
  663.     If ((Session.Property("OSLANGUAGE") = "ES") Or (Session.Property("ProductLanguage") = "1034")) Then
  664.         Session.FeatureRequestState("RequiredES") = msiInstallStateLocal
  665.         Session.FeatureRequestState("RegistrationES") = msiInstallStateLocal
  666.     End If
  667.     If (Session.Property("ESLANG") = "1") Then
  668.         Session.FeatureRequestState("RequiredES") = msiInstallStateLocal
  669.         If (IsFeatureSelected("MainApplications") = True) Then
  670.             Session.FeatureRequestState("ES") = msiInstallStateLocal
  671.         End If
  672.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  673.             Session.FeatureRequestState("VBAES") = msiInstallStateLocal
  674.         Else
  675.             Session.FeatureRequestState("VBAES") = msiInstallStateAbsent
  676.         End If
  677.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  678.             Session.FeatureRequestState("Spanish") = msiInstallStateLocal
  679.             Session.FeatureRequestState("DrawProgFilesRequiredES") = msiInstallStateLocal
  680.         Else
  681.             Session.FeatureRequestState("DrawProgFilesRequiredES") = msiInstallStateAbsent
  682.         End If
  683.         If (IsFeatureSelected(("WritingTools")) = True) Then
  684.             Session.FeatureRequestState("WT4ESLANG") = msiInstallStateLocal
  685.         Else
  686.             Session.FeatureRequestState("WT4ESLANG") = msiInstallStateAbsent
  687.         End If
  688.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  689.             Session.FeatureRequestState("DrawHelpES") = msiInstallStateLocal
  690.         Else
  691.             Session.FeatureRequestState("DrawHelpES") = msiInstallStateAbsent
  692.         End If
  693.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  694.             Session.FeatureRequestState("PPProgFilesRequiredES") = msiInstallStateLocal
  695.         Else
  696.             Session.FeatureRequestState("PPProgFilesRequiredES") = msiInstallStateAbsent
  697.         End If
  698.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  699.             Session.FeatureRequestState("PPHelpES") = msiInstallStateLocal
  700.         Else
  701.             Session.FeatureRequestState("PPHelpES") = msiInstallStateAbsent
  702.         End If
  703.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  704.             Session.FeatureRequestState("RaveProgFilesRequiredES") = msiInstallStateLocal
  705.         Else
  706.             Session.FeatureRequestState("RaveProgFilesRequiredES") = msiInstallStateAbsent
  707.         End If
  708.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  709.             Session.FeatureRequestState("RaveHelpES") = msiInstallStateLocal
  710.         Else
  711.             Session.FeatureRequestState("RaveHelpES") = msiInstallStateAbsent
  712.         End If
  713.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  714.             Session.FeatureRequestState("TraceHelpES") = msiInstallStateLocal
  715.         Else
  716.             Session.FeatureRequestState("TraceHelpES") = msiInstallStateAbsent
  717.         End If
  718.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  719.             Session.FeatureRequestState("CaptureHelpES") = msiInstallStateLocal
  720.         Else
  721.             Session.FeatureRequestState("CaptureHelpES") = msiInstallStateAbsent
  722.         End If
  723.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  724.             Session.FeatureRequestState("BarcodeHelpES") = msiInstallStateLocal
  725.         Else
  726.             Session.FeatureRequestState("BarcodeHelpES") = msiInstallStateAbsent
  727.         End If
  728.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  729.             Session.FeatureRequestState("DrawPresetsES") = msiInstallStateLocal
  730.         Else
  731.             Session.FeatureRequestState("DrawPresetsES") = msiInstallStateAbsent
  732.         End If
  733.         If (IsFeatureSelected(("RavePresets")) = True) Then
  734.             Session.FeatureRequestState("RavePresetsES") = msiInstallStateLocal
  735.         Else
  736.             Session.FeatureRequestState("RavePresetsES") = msiInstallStateAbsent
  737.         End If
  738.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  739.             Session.FeatureRequestState("PPPresetsES") = msiInstallStateLocal
  740.         Else
  741.             Session.FeatureRequestState("PPPresetsES") = msiInstallStateAbsent
  742.         End If
  743.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  744.             Session.FeatureRequestState("DrawTutorsES") = msiInstallStateLocal
  745.         Else
  746.             Session.FeatureRequestState("DrawTutorsES") = msiInstallStateAbsent
  747.         End If
  748.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  749.             Session.FeatureRequestState("RaveTutorsES") = msiInstallStateLocal
  750.         Else
  751.             Session.FeatureRequestState("RaveTutorsES") = msiInstallStateAbsent
  752.         End If
  753.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  754.             Session.FeatureRequestState("PPTutorsES") = msiInstallStateLocal
  755.         Else
  756.             Session.FeatureRequestState("PPTutorsES") = msiInstallStateAbsent
  757.         End If
  758.         If (IsFeatureSelected(("UserGuide")) = True) Then
  759.             Session.FeatureRequestState("UserGuideES") = msiInstallStateLocal
  760.         Else
  761.             Session.FeatureRequestState("UserGuideES") = msiInstallStateAbsent
  762.         End If
  763.     Else
  764.         Session.FeatureRequestState("ES") = msiInstallStateAbsent
  765.         Session.FeatureRequestState("UserGuideES") = msiInstallStateAbsent
  766.         Session.FeatureRequestState("DrawProgFilesRequiredES") = msiInstallStateAbsent
  767.         Session.FeatureRequestState("PPProgFilesRequiredES") = msiInstallStateAbsent
  768.         Session.FeatureRequestState("RaveProgFilesRequiredES") = msiInstallStateAbsent
  769.         Session.FeatureRequestState("VBAES") = msiInstallStateAbsent
  770.         Session.FeatureRequestState("WT4ESLANG") = msiInstallStateAbsent
  771.         Session.FeatureRequestState("DrawHelpES") = msiInstallStateAbsent
  772.         Session.FeatureRequestState("PPHelpES") = msiInstallStateAbsent
  773.         Session.FeatureRequestState("RaveHelpES") = msiInstallStateAbsent
  774.         Session.FeatureRequestState("TraceHelpES") = msiInstallStateAbsent
  775.         Session.FeatureRequestState("CaptureHelpES") = msiInstallStateAbsent
  776.         Session.FeatureRequestState("BarcodeHelpES") = msiInstallStateAbsent
  777.         Session.FeatureRequestState("DrawPresetsES") = msiInstallStateAbsent
  778.         Session.FeatureRequestState("RavePresetsES") = msiInstallStateAbsent
  779.         Session.FeatureRequestState("PPPresetsES") = msiInstallStateAbsent
  780.         Session.FeatureRequestState("DrawTutorsES") = msiInstallStateAbsent
  781.         Session.FeatureRequestState("RaveTutorsES") = msiInstallStateAbsent
  782.         Session.FeatureRequestState("PPTutorsES") = msiInstallStateAbsent
  783.         If ((Session.Property("OSLANGUAGE") <> "ES") And (Session.Property("ProductLanguage") <> "1034")) Then
  784.             Session.FeatureRequestState("RequiredES") = msiInstallStateAbsent
  785.             Session.FeatureRequestState("RegistrationES") = msiInstallStateAbsent
  786.         End If
  787.     End If
  788. End If
  789. If (IsFeatureExists("BP") = 1) Then
  790.     If ((Session.Property("OSLANGUAGE") = "BR") Or (Session.Property("ProductLanguage") = "1046")) Then
  791.         Session.FeatureRequestState("RequiredBR") = msiInstallStateLocal
  792.         Session.FeatureRequestState("RegistrationBR") = msiInstallStateLocal
  793.     End If
  794.     If (Session.Property("BPLANG") = "1") Then
  795.         Session.FeatureRequestState("RequiredBR") = msiInstallStateLocal
  796.         If (IsFeatureSelected("MainApplications") = True) Then
  797.             Session.FeatureRequestState("BP") = msiInstallStateLocal
  798.         End If
  799.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  800.             Session.FeatureRequestState("VBABP") = msiInstallStateLocal
  801.         Else
  802.             Session.FeatureRequestState("VBABP") = msiInstallStateAbsent
  803.         End If
  804.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  805.             Session.FeatureRequestState("Portuguese") = msiInstallStateLocal
  806.             Session.FeatureRequestState("DrawProgFilesRequiredBR") = msiInstallStateLocal
  807.         Else
  808.             Session.FeatureRequestState("DrawProgFilesRequiredBR") = msiInstallStateAbsent
  809.         End If
  810.         If (IsFeatureSelected(("WritingTools")) = True) Then
  811.             Session.FeatureRequestState("WT4BRLANG") = msiInstallStateLocal
  812.         Else
  813.             Session.FeatureRequestState("WT4BRLANG") = msiInstallStateAbsent
  814.         End If
  815.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  816.             Session.FeatureRequestState("DrawHelpBR") = msiInstallStateLocal
  817.         Else
  818.             Session.FeatureRequestState("DrawHelpBR") = msiInstallStateAbsent
  819.         End If
  820.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  821.             Session.FeatureRequestState("PPProgFilesRequiredBR") = msiInstallStateLocal
  822.         Else
  823.             Session.FeatureRequestState("PPProgFilesRequiredBR") = msiInstallStateAbsent
  824.         End If
  825.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  826.             Session.FeatureRequestState("PPHelpBP") = msiInstallStateLocal
  827.         Else
  828.             Session.FeatureRequestState("PPHelpBP") = msiInstallStateAbsent
  829.         End If
  830.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  831.             Session.FeatureRequestState("RaveProgFilesRequiredBR") = msiInstallStateLocal
  832.         Else
  833.             Session.FeatureRequestState("RaveProgFilesRequiredBR") = msiInstallStateAbsent
  834.         End If
  835.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  836.             Session.FeatureRequestState("RaveHelpBP") = msiInstallStateLocal
  837.         Else
  838.             Session.FeatureRequestState("RaveHelpBP") = msiInstallStateAbsent
  839.         End If
  840.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  841.             Session.FeatureRequestState("TraceHelpBP") = msiInstallStateLocal
  842.         Else
  843.             Session.FeatureRequestState("TraceHelpBP") = msiInstallStateAbsent
  844.         End If
  845.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  846.             Session.FeatureRequestState("CaptureHelpBP") = msiInstallStateLocal
  847.         Else
  848.             Session.FeatureRequestState("CaptureHelpBP") = msiInstallStateAbsent
  849.         End If
  850.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  851.             Session.FeatureRequestState("BarcodeHelpBP") = msiInstallStateLocal
  852.         Else
  853.             Session.FeatureRequestState("BarcodeHelpBP") = msiInstallStateAbsent
  854.         End If
  855.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  856.             Session.FeatureRequestState("DrawPresetsBR") = msiInstallStateLocal
  857.         Else
  858.             Session.FeatureRequestState("DrawPresetsBR") = msiInstallStateAbsent
  859.         End If
  860.         If (IsFeatureSelected(("RavePresets")) = True) Then
  861.             Session.FeatureRequestState("RavePresetsBR") = msiInstallStateLocal
  862.         Else
  863.             Session.FeatureRequestState("RavePresetsBR") = msiInstallStateAbsent
  864.         End If
  865.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  866.             Session.FeatureRequestState("PPPresetsBR") = msiInstallStateLocal
  867.         Else
  868.             Session.FeatureRequestState("PPPresetsBR") = msiInstallStateAbsent
  869.         End If
  870.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  871.             Session.FeatureRequestState("DrawTutorsBP") = msiInstallStateLocal
  872.         Else
  873.             Session.FeatureRequestState("DrawTutorsBP") = msiInstallStateAbsent
  874.         End If
  875.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  876.             Session.FeatureRequestState("RaveTutorsBP") = msiInstallStateLocal
  877.         Else
  878.             Session.FeatureRequestState("RaveTutorsBP") = msiInstallStateAbsent
  879.         End If
  880.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  881.             Session.FeatureRequestState("PPTutorsBP") = msiInstallStateLocal
  882.         Else
  883.             Session.FeatureRequestState("PPTutorsBP") = msiInstallStateAbsent
  884.         End If
  885.         If (IsFeatureSelected(("UserGuide")) = True) Then
  886.             Session.FeatureRequestState("UserGuideBR") = msiInstallStateLocal
  887.         Else
  888.             Session.FeatureRequestState("UserGuideBR") = msiInstallStateAbsent
  889.         End If
  890.     Else
  891.         Session.FeatureRequestState("BP") = msiInstallStateAbsent
  892.         Session.FeatureRequestState("UserGuideBR") = msiInstallStateAbsent
  893.         Session.FeatureRequestState("DrawProgFilesRequiredBR") = msiInstallStateAbsent
  894.         Session.FeatureRequestState("PPProgFilesRequiredBR") = msiInstallStateAbsent
  895.         Session.FeatureRequestState("RaveProgFilesRequiredBR") = msiInstallStateAbsent
  896.         Session.FeatureRequestState("VBABP") = msiInstallStateAbsent
  897.         Session.FeatureRequestState("WT4BRLANG") = msiInstallStateAbsent
  898.         Session.FeatureRequestState("DrawHelpBR") = msiInstallStateAbsent
  899.         Session.FeatureRequestState("PPHelpBR") = msiInstallStateAbsent
  900.         Session.FeatureRequestState("RaveHelpBR") = msiInstallStateAbsent
  901.         Session.FeatureRequestState("TraceHelpBR") = msiInstallStateAbsent
  902.         Session.FeatureRequestState("CaptureHelpBR") = msiInstallStateAbsent
  903.         Session.FeatureRequestState("BarcodeHelpBR") = msiInstallStateAbsent
  904.         Session.FeatureRequestState("DrawPresetsBR") = msiInstallStateAbsent
  905.         Session.FeatureRequestState("RavePresetsBR") = msiInstallStateAbsent
  906.         Session.FeatureRequestState("PPPresetsBR") = msiInstallStateAbsent
  907.         Session.FeatureRequestState("DrawTutorsBP") = msiInstallStateAbsent
  908.         Session.FeatureRequestState("RaveTutorsBP") = msiInstallStateAbsent
  909.         Session.FeatureRequestState("PPTutorsBP") = msiInstallStateAbsent
  910.         If ((Session.Property("OSLANGUAGE") <> "BR") And (Session.Property("ProductLanguage") <> "1046")) Then
  911.             Session.FeatureRequestState("RequiredBR") = msiInstallStateAbsent
  912.             Session.FeatureRequestState("RegistrationBR") = msiInstallStateAbsent
  913.         End If
  914.     End If
  915. End If
  916. If (IsFeatureExists("CS") = 1) Then
  917.     If ((Session.Property("OSLANGUAGE") = "CS") Or (Session.Property("ProductLanguage") = "2052")) Then
  918.         Session.FeatureRequestState("RequiredCS") = msiInstallStateLocal
  919.         Session.FeatureRequestState("RegistrationCS") = msiInstallStateLocal
  920.     End If
  921.     If (Session.Property("CSLANG") = "1") Then
  922.         Session.FeatureRequestState("RequiredCS") = msiInstallStateLocal
  923.         If (IsFeatureSelected("MainApplications") = True) Then
  924.             Session.FeatureRequestState("CS") = msiInstallStateLocal
  925.         End If
  926.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  927.             Session.FeatureRequestState("VBACS") = msiInstallStateLocal
  928.         Else
  929.             Session.FeatureRequestState("VBACS") = msiInstallStateAbsent
  930.         End If
  931.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  932.             Session.FeatureRequestState("DrawProgFilesRequiredCS") = msiInstallStateLocal
  933.         Else
  934.             Session.FeatureRequestState("DrawProgFilesRequiredCS") = msiInstallStateAbsent
  935.         End If
  936.         If (IsFeatureSelected(("WritingTools")) = True) Then
  937.             Session.FeatureRequestState("WT4CSLANG") = msiInstallStateLocal
  938.         Else
  939.             Session.FeatureRequestState("WT4CSLANG") = msiInstallStateAbsent
  940.         End If
  941.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  942.             Session.FeatureRequestState("DrawHelpCS") = msiInstallStateLocal
  943.         Else
  944.             Session.FeatureRequestState("DrawHelpCS") = msiInstallStateAbsent
  945.         End If
  946.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  947.             Session.FeatureRequestState("PPProgFilesRequiredCS") = msiInstallStateLocal
  948.         Else
  949.             Session.FeatureRequestState("PPProgFilesRequiredCS") = msiInstallStateAbsent
  950.         End If
  951.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  952.             Session.FeatureRequestState("PPHelpCS") = msiInstallStateLocal
  953.         Else
  954.             Session.FeatureRequestState("PPHelpCS") = msiInstallStateAbsent
  955.         End If
  956.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  957.             Session.FeatureRequestState("RaveProgFilesRequiredCS") = msiInstallStateLocal
  958.         Else
  959.             Session.FeatureRequestState("RaveProgFilesRequiredCS") = msiInstallStateAbsent
  960.         End If
  961.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  962.             Session.FeatureRequestState("RaveHelpCS") = msiInstallStateLocal
  963.         Else
  964.             Session.FeatureRequestState("RaveHelpCS") = msiInstallStateAbsent
  965.         End If
  966.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  967.             Session.FeatureRequestState("TraceHelpCS") = msiInstallStateLocal
  968.         Else
  969.             Session.FeatureRequestState("TraceHelpCS") = msiInstallStateAbsent
  970.         End If
  971.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  972.             Session.FeatureRequestState("CaptureHelpCS") = msiInstallStateLocal
  973.         Else
  974.             Session.FeatureRequestState("CaptureHelpCS") = msiInstallStateAbsent
  975.         End If
  976.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  977.             Session.FeatureRequestState("BarcodeHelpCS") = msiInstallStateLocal
  978.         Else
  979.             Session.FeatureRequestState("BarcodeHelpCS") = msiInstallStateAbsent
  980.         End If
  981.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  982.             Session.FeatureRequestState("DrawPresetsCS") = msiInstallStateLocal
  983.         Else
  984.             Session.FeatureRequestState("DrawPresetsCS") = msiInstallStateAbsent
  985.         End If
  986.         If (IsFeatureSelected(("RavePresets")) = True) Then
  987.             Session.FeatureRequestState("RavePresetsCS") = msiInstallStateLocal
  988.         Else
  989.             Session.FeatureRequestState("RavePresetsCS") = msiInstallStateAbsent
  990.         End If
  991.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  992.             Session.FeatureRequestState("PPPresetsCS") = msiInstallStateLocal
  993.         Else
  994.             Session.FeatureRequestState("PPPresetsCS") = msiInstallStateAbsent
  995.         End If
  996.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  997.             Session.FeatureRequestState("DrawTutorsCS") = msiInstallStateLocal
  998.         Else
  999.             Session.FeatureRequestState("DrawTutorsCS") = msiInstallStateAbsent
  1000.         End If
  1001.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1002.             Session.FeatureRequestState("RaveTutorsCS") = msiInstallStateLocal
  1003.         Else
  1004.             Session.FeatureRequestState("RaveTutorsCS") = msiInstallStateAbsent
  1005.         End If
  1006.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1007.             Session.FeatureRequestState("PPTutorsCS") = msiInstallStateLocal
  1008.         Else
  1009.             Session.FeatureRequestState("PPTutorsCS") = msiInstallStateAbsent
  1010.         End If
  1011.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1012.             Session.FeatureRequestState("UserGuideCS") = msiInstallStateLocal
  1013.         Else
  1014.             Session.FeatureRequestState("UserGuideCS") = msiInstallStateAbsent
  1015.         End If
  1016.     Else
  1017.         Session.FeatureRequestState("CS") = msiInstallStateAbsent
  1018.         Session.FeatureRequestState("UserGuideCS") = msiInstallStateAbsent
  1019.         Session.FeatureRequestState("DrawProgFilesRequiredCS") = msiInstallStateAbsent
  1020.         Session.FeatureRequestState("PPProgFilesRequiredCS") = msiInstallStateAbsent
  1021.         Session.FeatureRequestState("RaveProgFilesRequiredCS") = msiInstallStateAbsent
  1022.         Session.FeatureRequestState("VBACS") = msiInstallStateAbsent
  1023.         Session.FeatureRequestState("WT4CSLANG") = msiInstallStateAbsent
  1024.         Session.FeatureRequestState("DrawHelpCS") = msiInstallStateAbsent
  1025.         Session.FeatureRequestState("PPHelpCS") = msiInstallStateAbsent
  1026.         Session.FeatureRequestState("RaveHelpCS") = msiInstallStateAbsent
  1027.         Session.FeatureRequestState("TraceHelpCS") = msiInstallStateAbsent
  1028.         Session.FeatureRequestState("CaptureHelpCS") = msiInstallStateAbsent
  1029.         Session.FeatureRequestState("BarcodeHelpCS") = msiInstallStateAbsent
  1030.         Session.FeatureRequestState("DrawPresetsCS") = msiInstallStateAbsent
  1031.         Session.FeatureRequestState("RavePresetsCS") = msiInstallStateAbsent
  1032.         Session.FeatureRequestState("PPPresetsCS") = msiInstallStateAbsent
  1033.         Session.FeatureRequestState("DrawTutorsCS") = msiInstallStateAbsent
  1034.         Session.FeatureRequestState("RaveTutorsCS") = msiInstallStateAbsent
  1035.         Session.FeatureRequestState("PPTutorsCS") = msiInstallStateAbsent
  1036.  
  1037.         If ((Session.Property("OSLANGUAGE") <> "CS") And (Session.Property("ProductLanguage") <> "2052")) Then
  1038.             Session.FeatureRequestState("RequiredCS") = msiInstallStateAbsent
  1039.             Session.FeatureRequestState("RegistrationCS") = msiInstallStateAbsent
  1040.         End If
  1041.     End If
  1042. End If
  1043. If (IsFeatureExists("CT") = 1) Then
  1044.     If ((Session.Property("OSLANGUAGE") = "CT") Or (Session.Property("ProductLanguage") = "1028")) Then
  1045.         Session.FeatureRequestState("RequiredCT") = msiInstallStateLocal
  1046.         Session.FeatureRequestState("RegistrationCT") = msiInstallStateLocal
  1047.     End If
  1048.     If (Session.Property("CTLANG") = "1") Then
  1049.         Session.FeatureRequestState("RequiredCT") = msiInstallStateLocal
  1050.         If (IsFeatureSelected("MainApplications") = True) Then
  1051.             Session.FeatureRequestState("CT") = msiInstallStateLocal
  1052.         End If
  1053.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  1054.             Session.FeatureRequestState("VBACT") = msiInstallStateLocal
  1055.         Else
  1056.             Session.FeatureRequestState("VBACT") = msiInstallStateAbsent
  1057.         End If
  1058.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1059.             Session.FeatureRequestState("DrawProgFilesRequiredCT") = msiInstallStateLocal
  1060.         Else
  1061.             Session.FeatureRequestState("DrawProgFilesRequiredCT") = msiInstallStateAbsent
  1062.         End If
  1063.         If (IsFeatureSelected(("WritingTools")) = True) Then
  1064.             Session.FeatureRequestState("WT4CTLANG") = msiInstallStateLocal
  1065.         Else
  1066.             Session.FeatureRequestState("WT4CTLANG") = msiInstallStateAbsent
  1067.         End If
  1068.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  1069.             Session.FeatureRequestState("PPProgFilesRequiredCT") = msiInstallStateLocal
  1070.         Else
  1071.             Session.FeatureRequestState("PPProgFilesRequiredCT") = msiInstallStateAbsent
  1072.         End If
  1073.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  1074.             Session.FeatureRequestState("DrawHelpCT") = msiInstallStateLocal
  1075.         Else
  1076.             Session.FeatureRequestState("DrawHelpCT") = msiInstallStateAbsent
  1077.         End If
  1078.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  1079.             Session.FeatureRequestState("PPHelpCT") = msiInstallStateLocal
  1080.         Else
  1081.             Session.FeatureRequestState("PPHelpCT") = msiInstallStateAbsent
  1082.         End If
  1083.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  1084.             Session.FeatureRequestState("RaveProgFilesRequiredCT") = msiInstallStateLocal
  1085.         Else
  1086.             Session.FeatureRequestState("RaveProgFilesRequiredCT") = msiInstallStateAbsent
  1087.         End If
  1088.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  1089.             Session.FeatureRequestState("RaveHelpCT") = msiInstallStateLocal
  1090.         Else
  1091.             Session.FeatureRequestState("RaveHelpCT") = msiInstallStateAbsent
  1092.         End If
  1093.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  1094.             Session.FeatureRequestState("TraceHelpCT") = msiInstallStateLocal
  1095.         Else
  1096.             Session.FeatureRequestState("TraceHelpCT") = msiInstallStateAbsent
  1097.         End If
  1098.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  1099.             Session.FeatureRequestState("CaptureHelpCT") = msiInstallStateLocal
  1100.         Else
  1101.             Session.FeatureRequestState("CaptureHelpCT") = msiInstallStateAbsent
  1102.         End If
  1103.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  1104.             Session.FeatureRequestState("BarcodeHelpCT") = msiInstallStateLocal
  1105.         Else
  1106.             Session.FeatureRequestState("BarcodeHelpCT") = msiInstallStateAbsent
  1107.         End If
  1108.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  1109.             Session.FeatureRequestState("DrawPresetsCT") = msiInstallStateLocal
  1110.         Else
  1111.             Session.FeatureRequestState("DrawPresetsCT") = msiInstallStateAbsent
  1112.         End If
  1113.         If (IsFeatureSelected(("RavePresets")) = True) Then
  1114.             Session.FeatureRequestState("RavePresetsCT") = msiInstallStateLocal
  1115.         Else
  1116.             Session.FeatureRequestState("RavePresetsCT") = msiInstallStateAbsent
  1117.         End If
  1118.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  1119.             Session.FeatureRequestState("PPPresetsCT") = msiInstallStateLocal
  1120.         Else
  1121.             Session.FeatureRequestState("PPPresetsCT") = msiInstallStateAbsent
  1122.         End If
  1123.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  1124.             Session.FeatureRequestState("DrawTutorsCT") = msiInstallStateLocal
  1125.         Else
  1126.             Session.FeatureRequestState("DrawTutorsCT") = msiInstallStateAbsent
  1127.         End If
  1128.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1129.             Session.FeatureRequestState("RaveTutorsCT") = msiInstallStateLocal
  1130.         Else
  1131.             Session.FeatureRequestState("RaveTutorsCT") = msiInstallStateAbsent
  1132.         End If
  1133.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1134.             Session.FeatureRequestState("PPTutorsCT") = msiInstallStateLocal
  1135.         Else
  1136.             Session.FeatureRequestState("PPTutorsCT") = msiInstallStateAbsent
  1137.         End If
  1138.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1139.             Session.FeatureRequestState("UserGuideCT") = msiInstallStateLocal
  1140.         Else
  1141.             Session.FeatureRequestState("UserGuideCT") = msiInstallStateAbsent
  1142.         End If
  1143.     Else
  1144.         Session.FeatureRequestState("CT") = msiInstallStateAbsent
  1145.         Session.FeatureRequestState("UserGuideCT") = msiInstallStateAbsent
  1146.         Session.FeatureRequestState("DrawProgFilesRequiredCT") = msiInstallStateAbsent
  1147.         Session.FeatureRequestState("PPProgFilesRequiredCT") = msiInstallStateAbsent
  1148.         Session.FeatureRequestState("RaveProgFilesRequiredCT") = msiInstallStateAbsent
  1149.         Session.FeatureRequestState("VBACT") = msiInstallStateAbsent
  1150.         Session.FeatureRequestState("WT4CTLANG") = msiInstallStateAbsent
  1151.         Session.FeatureRequestState("DrawHelpCT") = msiInstallStateAbsent
  1152.         Session.FeatureRequestState("PPHelpCT") = msiInstallStateAbsent
  1153.         Session.FeatureRequestState("RaveHelpCT") = msiInstallStateAbsent
  1154.         Session.FeatureRequestState("TraceHelpCT") = msiInstallStateAbsent
  1155.         Session.FeatureRequestState("CaptureHelpCT") = msiInstallStateAbsent
  1156.         Session.FeatureRequestState("BarcodeHelpCT") = msiInstallStateAbsent
  1157.         Session.FeatureRequestState("DrawPresetsCT") = msiInstallStateAbsent
  1158.         Session.FeatureRequestState("RavePresetsCT") = msiInstallStateAbsent
  1159.         Session.FeatureRequestState("PPPresetsCT") = msiInstallStateAbsent
  1160.         Session.FeatureRequestState("DrawTutorsCT") = msiInstallStateAbsent
  1161.         Session.FeatureRequestState("RaveTutorsCT") = msiInstallStateAbsent
  1162.         Session.FeatureRequestState("PPTutorsCT") = msiInstallStateAbsent
  1163.  
  1164.         If ((Session.Property("OSLANGUAGE") <> "CT") And (Session.Property("ProductLanguage") <> "1028")) Then
  1165.             Session.FeatureRequestState("RequiredCT") = msiInstallStateAbsent
  1166.             Session.FeatureRequestState("RegistrationCT") = msiInstallStateAbsent
  1167.         End If
  1168.     End If
  1169. End If
  1170. If (IsFeatureExists("KO") = 1) Then
  1171.     If ((Session.Property("OSLANGUAGE") = "KR") Or (Session.Property("ProductLanguage") = "1042")) Then
  1172.         Session.FeatureRequestState("RequiredKR") = msiInstallStateLocal
  1173.         Session.FeatureRequestState("RegistrationKR") = msiInstallStateLocal
  1174.     End If
  1175.     If (Session.Property("KOLANG") = "1") Then
  1176.         Session.FeatureRequestState("RequiredKR") = msiInstallStateLocal
  1177.         If (IsFeatureSelected("MainApplications") = True) Then
  1178.             Session.FeatureRequestState("KO") = msiInstallStateLocal
  1179.         End If
  1180.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  1181.             Session.FeatureRequestState("VBAKO") = msiInstallStateLocal
  1182.         Else
  1183.             Session.FeatureRequestState("VBAKO") = msiInstallStateAbsent
  1184.         End If
  1185.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1186.             Session.FeatureRequestState("DrawProgFilesRequiredKR") = msiInstallStateLocal
  1187.         Else
  1188.             Session.FeatureRequestState("DrawProgFilesRequiredKR") = msiInstallStateAbsent
  1189.         End If
  1190.         If (IsFeatureSelected(("WritingTools")) = True) Then
  1191.             Session.FeatureRequestState("WT4KRLANG") = msiInstallStateLocal
  1192.         Else
  1193.             Session.FeatureRequestState("WT4KRLANG") = msiInstallStateAbsent
  1194.         End If
  1195.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  1196.             Session.FeatureRequestState("DrawHelpKR") = msiInstallStateLocal
  1197.         Else
  1198.             Session.FeatureRequestState("DrawHelpKR") = msiInstallStateAbsent
  1199.         End If
  1200.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  1201.             Session.FeatureRequestState("PPProgFilesRequiredKR") = msiInstallStateLocal
  1202.         Else
  1203.             Session.FeatureRequestState("PPProgFilesRequiredKR") = msiInstallStateAbsent
  1204.         End If
  1205.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  1206.             Session.FeatureRequestState("PPHelpKR") = msiInstallStateLocal
  1207.         Else
  1208.             Session.FeatureRequestState("PPHelpKR") = msiInstallStateAbsent
  1209.         End If
  1210.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  1211.             Session.FeatureRequestState("RaveProgFilesRequiredKR") = msiInstallStateLocal
  1212.         Else
  1213.             Session.FeatureRequestState("RaveProgFilesRequiredKR") = msiInstallStateAbsent
  1214.         End If
  1215.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  1216.             Session.FeatureRequestState("RaveHelpKR") = msiInstallStateLocal
  1217.         Else
  1218.             Session.FeatureRequestState("RaveHelpKR") = msiInstallStateAbsent
  1219.         End If
  1220.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  1221.             Session.FeatureRequestState("TraceHelpKR") = msiInstallStateLocal
  1222.         Else
  1223.             Session.FeatureRequestState("TraceHelpKR") = msiInstallStateAbsent
  1224.         End If
  1225.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  1226.             Session.FeatureRequestState("CaptureHelpKR") = msiInstallStateLocal
  1227.         Else
  1228.             Session.FeatureRequestState("CaptureHelpKR") = msiInstallStateAbsent
  1229.         End If
  1230.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  1231.             Session.FeatureRequestState("BarcodeHelpKR") = msiInstallStateLocal
  1232.         Else
  1233.             Session.FeatureRequestState("BarcodeHelpKR") = msiInstallStateAbsent
  1234.         End If
  1235.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  1236.             Session.FeatureRequestState("DrawPresetsKR") = msiInstallStateLocal
  1237.         Else
  1238.             Session.FeatureRequestState("DrawPresetsKR") = msiInstallStateAbsent
  1239.         End If
  1240.         If (IsFeatureSelected(("RavePresets")) = True) Then
  1241.             Session.FeatureRequestState("RavePresetsKR") = msiInstallStateLocal
  1242.         Else
  1243.             Session.FeatureRequestState("RavePresetsKR") = msiInstallStateAbsent
  1244.         End If
  1245.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  1246.             Session.FeatureRequestState("PPPresetsKR") = msiInstallStateLocal
  1247.         Else
  1248.             Session.FeatureRequestState("PPPresetsKR") = msiInstallStateAbsent
  1249.         End If
  1250.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  1251.             Session.FeatureRequestState("DrawTutorsKR") = msiInstallStateLocal
  1252.         Else
  1253.             Session.FeatureRequestState("DrawTutorsKR") = msiInstallStateAbsent
  1254.         End If
  1255.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1256.             Session.FeatureRequestState("RaveTutorsKR") = msiInstallStateLocal
  1257.         Else
  1258.             Session.FeatureRequestState("RaveTutorsKR") = msiInstallStateAbsent
  1259.         End If
  1260.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1261.             Session.FeatureRequestState("PPTutorsKR") = msiInstallStateLocal
  1262.         Else
  1263.             Session.FeatureRequestState("PPTutorsKR") = msiInstallStateAbsent
  1264.         End If
  1265.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1266.             Session.FeatureRequestState("UserGuideKR") = msiInstallStateLocal
  1267.         Else
  1268.             Session.FeatureRequestState("UserGuideKR") = msiInstallStateAbsent
  1269.         End If
  1270.     Else
  1271.         Session.FeatureRequestState("KR") = msiInstallStateAbsent
  1272.         Session.FeatureRequestState("UserGuideKR") = msiInstallStateAbsent
  1273.         Session.FeatureRequestState("DrawProgFilesRequiredKR") = msiInstallStateAbsent
  1274.         Session.FeatureRequestState("PPProgFilesRequiredKR") = msiInstallStateAbsent
  1275.         Session.FeatureRequestState("RaveProgFilesRequiredKR") = msiInstallStateAbsent
  1276.         Session.FeatureRequestState("VBAKR") = msiInstallStateAbsent
  1277.         Session.FeatureRequestState("WT4KRLANG") = msiInstallStateAbsent
  1278.         Session.FeatureRequestState("DrawHelpKR") = msiInstallStateAbsent
  1279.         Session.FeatureRequestState("PPHelpKR") = msiInstallStateAbsent
  1280.         Session.FeatureRequestState("RaveHelpKR") = msiInstallStateAbsent
  1281.         Session.FeatureRequestState("TraceHelpKR") = msiInstallStateAbsent
  1282.         Session.FeatureRequestState("CaptureHelpKR") = msiInstallStateAbsent
  1283.         Session.FeatureRequestState("BarcodeHelpKR") = msiInstallStateAbsent
  1284.         Session.FeatureRequestState("DrawPresetsKR") = msiInstallStateAbsent
  1285.         Session.FeatureRequestState("RavePresetsKR") = msiInstallStateAbsent
  1286.         Session.FeatureRequestState("PPPresetsKR") = msiInstallStateAbsent
  1287.         Session.FeatureRequestState("DrawTutorsKR") = msiInstallStateAbsent
  1288.         Session.FeatureRequestState("RaveTutorsKR") = msiInstallStateAbsent
  1289.         Session.FeatureRequestState("PPTutorsKR") = msiInstallStateAbsent
  1290.  
  1291.         If ((Session.Property("OSLANGUAGE") <> "KR") And (Session.Property("ProductLanguage") <> "1042")) Then
  1292.             Session.FeatureRequestState("RequiredKR") = msiInstallStateAbsent
  1293.             Session.FeatureRequestState("RegistrationKR") = msiInstallStateAbsent
  1294.         End If
  1295.     End If
  1296. End If
  1297. If (IsFeatureExists("NL") = 1) Then
  1298.     If ((Session.Property("OSLANGUAGE") = "NL") Or (Session.Property("ProductLanguage") = "1043")) Then
  1299.         Session.FeatureRequestState("RequiredNL") = msiInstallStateLocal
  1300.         Session.FeatureRequestState("RegistrationNL") = msiInstallStateLocal
  1301.     End If
  1302.     If (Session.Property("NLLANG") = "1") Then
  1303.         Session.FeatureRequestState("RequiredNL") = msiInstallStateLocal
  1304.         If (IsFeatureSelected("MainApplications") = True) Then
  1305.             Session.FeatureRequestState("NL") = msiInstallStateLocal
  1306.         End If
  1307.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  1308.             Session.FeatureRequestState("VBANL") = msiInstallStateLocal
  1309.         Else
  1310.             Session.FeatureRequestState("VBANL") = msiInstallStateAbsent
  1311.         End If
  1312.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1313.             Session.FeatureRequestState("Dutch") = msiInstallStateLocal
  1314.             Session.FeatureRequestState("DrawProgFilesRequiredNL") = msiInstallStateLocal
  1315.         Else
  1316.             Session.FeatureRequestState("DrawProgFilesRequiredNL") = msiInstallStateAbsent
  1317.         End If
  1318.         If (IsFeatureSelected(("WritingTools")) = True) Then
  1319.             Session.FeatureRequestState("WT4NLLANG") = msiInstallStateLocal
  1320.         Else
  1321.             Session.FeatureRequestState("WT4NLLANG") = msiInstallStateAbsent
  1322.         End If
  1323.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  1324.             Session.FeatureRequestState("DrawHelpNL") = msiInstallStateLocal
  1325.         Else
  1326.             Session.FeatureRequestState("DrawHelpNL") = msiInstallStateAbsent
  1327.         End If
  1328.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  1329.             Session.FeatureRequestState("PPProgFilesRequiredNL") = msiInstallStateLocal
  1330.         Else
  1331.             Session.FeatureRequestState("PPProgFilesRequiredNL") = msiInstallStateAbsent
  1332.         End If
  1333.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  1334.             Session.FeatureRequestState("PPHelpNL") = msiInstallStateLocal
  1335.         Else
  1336.             Session.FeatureRequestState("PPHelpNL") = msiInstallStateAbsent
  1337.         End If
  1338.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  1339.             Session.FeatureRequestState("RaveProgFilesRequiredNL") = msiInstallStateLocal
  1340.         Else
  1341.             Session.FeatureRequestState("RaveProgFilesRequiredNL") = msiInstallStateAbsent
  1342.         End If
  1343.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  1344.             Session.FeatureRequestState("RaveHelpNL") = msiInstallStateLocal
  1345.         Else
  1346.             Session.FeatureRequestState("RaveHelpNL") = msiInstallStateAbsent
  1347.         End If
  1348.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  1349.             Session.FeatureRequestState("TraceHelpNL") = msiInstallStateLocal
  1350.         Else
  1351.             Session.FeatureRequestState("TraceHelpNL") = msiInstallStateAbsent
  1352.         End If
  1353.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  1354.             Session.FeatureRequestState("CaptureHelpNL") = msiInstallStateLocal
  1355.         Else
  1356.             Session.FeatureRequestState("CaptureHelpNL") = msiInstallStateAbsent
  1357.         End If
  1358.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  1359.             Session.FeatureRequestState("BarcodeHelpNL") = msiInstallStateLocal
  1360.         Else
  1361.             Session.FeatureRequestState("BarcodeHelpNL") = msiInstallStateAbsent
  1362.         End If
  1363.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  1364.             Session.FeatureRequestState("DrawPresetsNL") = msiInstallStateLocal
  1365.         Else
  1366.             Session.FeatureRequestState("DrawPresetsNL") = msiInstallStateAbsent
  1367.         End If
  1368.         If (IsFeatureSelected(("RavePresets")) = True) Then
  1369.             Session.FeatureRequestState("RavePresetsNL") = msiInstallStateLocal
  1370.         Else
  1371.             Session.FeatureRequestState("RavePresetsNL") = msiInstallStateAbsent
  1372.         End If
  1373.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  1374.             Session.FeatureRequestState("PPPresetsNL") = msiInstallStateLocal
  1375.         Else
  1376.             Session.FeatureRequestState("PPPresetsNL") = msiInstallStateAbsent
  1377.         End If
  1378.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  1379.             Session.FeatureRequestState("DrawTutorsNL") = msiInstallStateLocal
  1380.         Else
  1381.             Session.FeatureRequestState("DrawTutorsNL") = msiInstallStateAbsent
  1382.         End If
  1383.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1384.             Session.FeatureRequestState("RaveTutorsNL") = msiInstallStateLocal
  1385.         Else
  1386.             Session.FeatureRequestState("RaveTutorsNL") = msiInstallStateAbsent
  1387.         End If
  1388.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1389.             Session.FeatureRequestState("PPTutorsNL") = msiInstallStateLocal
  1390.         Else
  1391.             Session.FeatureRequestState("PPTutorsNL") = msiInstallStateAbsent
  1392.         End If
  1393.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1394.             Session.FeatureRequestState("UserGuideNL") = msiInstallStateLocal
  1395.         Else
  1396.             Session.FeatureRequestState("UserGuideNL") = msiInstallStateAbsent
  1397.         End If
  1398.     Else
  1399.         Session.FeatureRequestState("NL") = msiInstallStateAbsent
  1400.         Session.FeatureRequestState("UserGuideNL") = msiInstallStateAbsent
  1401.         Session.FeatureRequestState("DrawProgFilesRequiredNL") = msiInstallStateAbsent
  1402.         Session.FeatureRequestState("PPProgFilesRequiredNL") = msiInstallStateAbsent
  1403.         Session.FeatureRequestState("RaveProgFilesRequiredNL") = msiInstallStateAbsent
  1404.         Session.FeatureRequestState("VBANL") = msiInstallStateAbsent
  1405.         Session.FeatureRequestState("WT4NLLANG") = msiInstallStateAbsent
  1406.         Session.FeatureRequestState("DrawHelpNL") = msiInstallStateAbsent
  1407.         Session.FeatureRequestState("PPHelpNL") = msiInstallStateAbsent
  1408.         Session.FeatureRequestState("RaveHelpNL") = msiInstallStateAbsent
  1409.         Session.FeatureRequestState("TraceHelpNL") = msiInstallStateAbsent
  1410.         Session.FeatureRequestState("CaptureHelpNL") = msiInstallStateAbsent
  1411.         Session.FeatureRequestState("BarcodeHelpNL") = msiInstallStateAbsent
  1412.         Session.FeatureRequestState("DrawPresetsNL") = msiInstallStateAbsent
  1413.         Session.FeatureRequestState("RavePresetsNL") = msiInstallStateAbsent
  1414.         Session.FeatureRequestState("PPPresetsNL") = msiInstallStateAbsent
  1415.         Session.FeatureRequestState("DrawTutorsNL") = msiInstallStateAbsent
  1416.         Session.FeatureRequestState("RaveTutorsNL") = msiInstallStateAbsent
  1417.         Session.FeatureRequestState("PPTutorsNL") = msiInstallStateAbsent
  1418.         If ((Session.Property("OSLANGUAGE") <> "NL") And (Session.Property("ProductLanguage") <> "1043")) Then
  1419.             Session.FeatureRequestState("RequiredNL") = msiInstallStateAbsent
  1420.             Session.FeatureRequestState("RegistrationNL") = msiInstallStateAbsent
  1421.         End If
  1422.     End If
  1423. End If
  1424. If (IsFeatureExists("PL") = 1) Then
  1425.     If ((Session.Property("OSLANGUAGE") = "PL") Or (Session.Property("ProductLanguage") = "1045")) Then
  1426.         Session.FeatureRequestState("RequiredPL") = msiInstallStateLocal
  1427.         Session.FeatureRequestState("RegistrationPL") = msiInstallStateLocal
  1428.     End If
  1429.     If (Session.Property("PLLANG") = "1") Then
  1430.         Session.FeatureRequestState("RequiredPL") = msiInstallStateLocal
  1431.         If (IsFeatureSelected("MainApplications") = True) Then
  1432.             Session.FeatureRequestState("PL") = msiInstallStateLocal
  1433.         End If
  1434.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  1435.             Session.FeatureRequestState("VBAEN") = msiInstallStateLocal
  1436.         Else
  1437.             nRemoveVBAPL = 1
  1438.         End If
  1439.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1440.             Session.FeatureRequestState("Polish") = msiInstallStateLocal
  1441.             Session.FeatureRequestState("DrawProgFilesRequiredPL") = msiInstallStateLocal
  1442.         Else
  1443.             Session.FeatureRequestState("DrawProgFilesRequiredPL") = msiInstallStateAbsent
  1444.         End If
  1445.         If (IsFeatureSelected(("WritingTools")) = True) Then
  1446.             Session.FeatureRequestState("WT4PLLANG") = msiInstallStateLocal
  1447.         Else
  1448.             Session.FeatureRequestState("WT4PLLANG") = msiInstallStateAbsent
  1449.         End If
  1450.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  1451.             Session.FeatureRequestState("DrawHelpPL") = msiInstallStateLocal
  1452.         Else
  1453.             Session.FeatureRequestState("DrawHelpPL") = msiInstallStateAbsent
  1454.         End If
  1455.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  1456.             Session.FeatureRequestState("PPProgFilesRequiredPL") = msiInstallStateLocal
  1457.         Else
  1458.             Session.FeatureRequestState("PPProgFilesRequiredPL") = msiInstallStateAbsent
  1459.         End If
  1460.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  1461.             Session.FeatureRequestState("PPHelpPL") = msiInstallStateLocal
  1462.         Else
  1463.             Session.FeatureRequestState("PPHelpPL") = msiInstallStateAbsent
  1464.         End If
  1465.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  1466.             Session.FeatureRequestState("RaveProgFilesRequiredPL") = msiInstallStateLocal
  1467.         Else
  1468.             Session.FeatureRequestState("RaveProgFilesRequiredPL") = msiInstallStateAbsent
  1469.         End If
  1470.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  1471.             Session.FeatureRequestState("RaveHelpPL") = msiInstallStateLocal
  1472.         Else
  1473.             Session.FeatureRequestState("RaveHelpPL") = msiInstallStateAbsent
  1474.         End If
  1475.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  1476.             Session.FeatureRequestState("TraceHelpPL") = msiInstallStateLocal
  1477.         Else
  1478.             Session.FeatureRequestState("TraceHelpPL") = msiInstallStateAbsent
  1479.         End If
  1480.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  1481.             Session.FeatureRequestState("CaptureHelpPL") = msiInstallStateLocal
  1482.         Else
  1483.             Session.FeatureRequestState("CaptureHelpPL") = msiInstallStateAbsent
  1484.         End If
  1485.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  1486.             Session.FeatureRequestState("BarcodeHelpPL") = msiInstallStateLocal
  1487.         Else
  1488.             Session.FeatureRequestState("BarcodeHelpPL") = msiInstallStateAbsent
  1489.         End If
  1490.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  1491.             Session.FeatureRequestState("DrawPresetsPL") = msiInstallStateLocal
  1492.         Else
  1493.             Session.FeatureRequestState("DrawPresetsPL") = msiInstallStateAbsent
  1494.         End If
  1495.         If (IsFeatureSelected(("RavePresets")) = True) Then
  1496.             Session.FeatureRequestState("RavePresetsPL") = msiInstallStateLocal
  1497.         Else
  1498.             Session.FeatureRequestState("RavePresetsPL") = msiInstallStateAbsent
  1499.         End If
  1500.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  1501.             Session.FeatureRequestState("PPPresetsPL") = msiInstallStateLocal
  1502.         Else
  1503.             Session.FeatureRequestState("PPPresetsPL") = msiInstallStateAbsent
  1504.         End If
  1505.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  1506.             Session.FeatureRequestState("DrawTutorsPL") = msiInstallStateLocal
  1507.         Else
  1508.             Session.FeatureRequestState("DrawTutorsPL") = msiInstallStateAbsent
  1509.         End If
  1510.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1511.             Session.FeatureRequestState("RaveTutorsPL") = msiInstallStateLocal
  1512.         Else
  1513.             Session.FeatureRequestState("RaveTutorsPL") = msiInstallStateAbsent
  1514.         End If
  1515.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1516.             Session.FeatureRequestState("PPTutorsPL") = msiInstallStateLocal
  1517.         Else
  1518.             Session.FeatureRequestState("PPTutorsPL") = msiInstallStateAbsent
  1519.         End If
  1520.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1521.             Session.FeatureRequestState("UserGuidePL") = msiInstallStateLocal
  1522.         Else
  1523.             Session.FeatureRequestState("UserGuidePL") = msiInstallStateAbsent
  1524.         End If
  1525.     Else
  1526.         Session.FeatureRequestState("PL") = msiInstallStateAbsent
  1527.         nRemoveVBAPL = 1
  1528.         Session.FeatureRequestState("WT4PLLANG") = msiInstallStateAbsent
  1529.         Session.FeatureRequestState("DrawProgFilesRequiredPL") = msiInstallStateAbsent
  1530.         Session.FeatureRequestState("PPProgFilesRequiredPL") = msiInstallStateAbsent
  1531.         Session.FeatureRequestState("RaveProgFilesRequiredPL") = msiInstallStateAbsent
  1532.         Session.FeatureRequestState("UserGuidePL") = msiInstallStateAbsent
  1533.         Session.FeatureRequestState("DrawHelpPL") = msiInstallStateAbsent
  1534.         Session.FeatureRequestState("PPHelpPL") = msiInstallStateAbsent
  1535.         Session.FeatureRequestState("RaveHelpPL") = msiInstallStateAbsent
  1536.         Session.FeatureRequestState("TraceHelpPL") = msiInstallStateAbsent
  1537.         Session.FeatureRequestState("CaptureHelpPL") = msiInstallStateAbsent
  1538.         Session.FeatureRequestState("BarcodeHelpPL") = msiInstallStateAbsent
  1539.         Session.FeatureRequestState("DrawPresetsPL") = msiInstallStateAbsent
  1540.         Session.FeatureRequestState("RavePresetsPL") = msiInstallStateAbsent
  1541.         Session.FeatureRequestState("PPPresetsPL") = msiInstallStateAbsent
  1542.         Session.FeatureRequestState("DrawTutorsPL") = msiInstallStateAbsent
  1543.         Session.FeatureRequestState("RaveTutorsPL") = msiInstallStateAbsent
  1544.         Session.FeatureRequestState("PPTutorsPL") = msiInstallStateAbsent
  1545.         If ((Session.Property("OSLANGUAGE") <> "PL") And (Session.Property("ProductLanguage") <> "1045")) Then
  1546.             Session.FeatureRequestState("RequiredPL") = msiInstallStateAbsent
  1547.             Session.FeatureRequestState("RegistrationPL") = msiInstallStateAbsent
  1548.         End If
  1549.     End If
  1550. Else
  1551.     nRemoveVBAPL = 1
  1552. End If
  1553. If (IsFeatureExists("CZ") = 1) Then
  1554.     If ((Session.Property("OSLANGUAGE") = "CZ") Or  (Session.Property("ProductLanguage") = "1029")) Then
  1555.         Session.FeatureRequestState("RequiredCZ") = msiInstallStateLocal
  1556.         Session.FeatureRequestState("RegistrationCZ") = msiInstallStateLocal
  1557.     End If
  1558.     If (Session.Property("CZLANG") = "1") Then
  1559.         Session.FeatureRequestState("RequiredCZ") = msiInstallStateLocal
  1560.         If (IsFeatureSelected("MainApplications") = True) Then
  1561.             Session.FeatureRequestState("CZ") = msiInstallStateLocal
  1562.         End If
  1563.         If (IsFeatureSelected("VBAProgramFiles") = True) Then
  1564.             Session.FeatureRequestState("VBAEN") = msiInstallStateLocal
  1565.         Else
  1566.             nRemoveVBACZ = 1
  1567.         End If
  1568.         If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1569.             Session.FeatureRequestState("DrawProgFilesRequiredCZ") = msiInstallStateLocal
  1570.         Else
  1571.             Session.FeatureRequestState("DrawProgFilesRequiredCZ") = msiInstallStateAbsent
  1572.         End If
  1573.         If (IsFeatureSelected(("WritingTools")) = True) Then
  1574.             Session.FeatureRequestState("WT4CZLANG") = msiInstallStateLocal
  1575.         Else
  1576.             Session.FeatureRequestState("WT4CZLANG") = msiInstallStateAbsent
  1577.         End If
  1578.         If (IsFeatureSelected(("DrawHelpFiles")) = True) Then
  1579.             Session.FeatureRequestState("DrawHelpCZ") = msiInstallStateLocal
  1580.         Else
  1581.             Session.FeatureRequestState("DrawHelpCZ") = msiInstallStateAbsent
  1582.         End If
  1583.         If (IsFeatureSelected("PPProgramFiles") = True) Then
  1584.             Session.FeatureRequestState("PPProgFilesRequiredCZ") = msiInstallStateLocal
  1585.         Else
  1586.             Session.FeatureRequestState("PPProgFilesRequiredCZ") = msiInstallStateAbsent
  1587.         End If
  1588.         If (IsFeatureSelected(("PPHelpFiles")) = True) Then
  1589.             Session.FeatureRequestState("PPHelpCZ") = msiInstallStateLocal
  1590.         Else
  1591.             Session.FeatureRequestState("PPHelpCZ") = msiInstallStateAbsent
  1592.         End If
  1593.         If (IsFeatureSelected("RaveProgramFiles") = True) Then
  1594.             Session.FeatureRequestState("RaveProgFilesRequiredCZ") = msiInstallStateLocal
  1595.         Else
  1596.             Session.FeatureRequestState("RaveProgFilesRequiredCZ") = msiInstallStateAbsent
  1597.         End If
  1598.         If (IsFeatureSelected(("RaveHelpFiles")) = True) Then
  1599.             Session.FeatureRequestState("RaveHelpCZ") = msiInstallStateLocal
  1600.         Else
  1601.             Session.FeatureRequestState("RaveHelpCZ") = msiInstallStateAbsent
  1602.         End If
  1603.         If (IsFeatureSelected(("TraceHelpFiles")) = True) Then
  1604.             Session.FeatureRequestState("TraceHelpCZ") = msiInstallStateLocal
  1605.         Else
  1606.             Session.FeatureRequestState("TraceHelpCZ") = msiInstallStateAbsent
  1607.         End If
  1608.         If (IsFeatureSelected(("CaptureHelpFiles")) = True) Then
  1609.             Session.FeatureRequestState("CaptureHelpCZ") = msiInstallStateLocal
  1610.         Else
  1611.             Session.FeatureRequestState("CaptureHelpCZ") = msiInstallStateAbsent
  1612.         End If
  1613.         If (IsFeatureSelected(("BarcodeWizard")) = True) Then
  1614.             Session.FeatureRequestState("BarcodeHelpCZ") = msiInstallStateLocal
  1615.         Else
  1616.             Session.FeatureRequestState("BarcodeHelpCZ") = msiInstallStateAbsent
  1617.         End If
  1618.         If (IsFeatureSelected(("DrawPresets")) = True) Then
  1619.             Session.FeatureRequestState("DrawPresetsCZ") = msiInstallStateLocal
  1620.         Else
  1621.             Session.FeatureRequestState("DrawPresetsCZ") = msiInstallStateAbsent
  1622.         End If
  1623.         If (IsFeatureSelected(("RavePresets")) = True) Then
  1624.             Session.FeatureRequestState("RavePresetsCZ") = msiInstallStateLocal
  1625.         Else
  1626.             Session.FeatureRequestState("RavePresetsCZ") = msiInstallStateAbsent
  1627.         End If
  1628.         If (IsFeatureSelected(("PPProgramFiles")) = True) Then
  1629.             Session.FeatureRequestState("PPPresetsCZ") = msiInstallStateLocal
  1630.         Else
  1631.             Session.FeatureRequestState("PPPresetsCZ") = msiInstallStateAbsent
  1632.         End If
  1633.         If (IsFeatureSelected(("DrawTutorsExamples")) = True) Then
  1634.             Session.FeatureRequestState("DrawTutorsCZ") = msiInstallStateLocal
  1635.         Else
  1636.             Session.FeatureRequestState("DrawTutorsCZ") = msiInstallStateAbsent
  1637.         End If
  1638.         If (IsFeatureSelected(("RaveTutors")) = True) Then
  1639.             Session.FeatureRequestState("RaveTutorsCZ") = msiInstallStateLocal
  1640.         Else
  1641.             Session.FeatureRequestState("RaveTutorsCZ") = msiInstallStateAbsent
  1642.         End If
  1643.         If (IsFeatureSelected(("PPTutorsExamples")) = True) Then
  1644.             Session.FeatureRequestState("PPTutorsCZ") = msiInstallStateLocal
  1645.         Else
  1646.             Session.FeatureRequestState("PPTutorsCZ") = msiInstallStateAbsent
  1647.         End If
  1648.         If (IsFeatureSelected(("UserGuide")) = True) Then
  1649.             Session.FeatureRequestState("UserGuideCZ") = msiInstallStateLocal
  1650.         Else
  1651.             Session.FeatureRequestState("UserGuideCZ") = msiInstallStateAbsent
  1652.         End If
  1653.     Else
  1654.         Session.FeatureRequestState("CZ") = msiInstallStateAbsent
  1655.         nRemoveVBACZ = 1
  1656.         Session.FeatureRequestState("WT4CZLANG") = msiInstallStateAbsent
  1657.         Session.FeatureRequestState("DrawProgFilesRequiredCZ") = msiInstallStateAbsent
  1658.         Session.FeatureRequestState("PPProgFilesRequiredCZ") = msiInstallStateAbsent
  1659.         Session.FeatureRequestState("RaveProgFilesRequiredCZ") = msiInstallStateAbsent
  1660.         Session.FeatureRequestState("UserGuideCZ") = msiInstallStateAbsent
  1661.         Session.FeatureRequestState("DrawHelpCZ") = msiInstallStateAbsent
  1662.         Session.FeatureRequestState("PPHelpCZ") = msiInstallStateAbsent
  1663.         Session.FeatureRequestState("RaveHelpCZ") = msiInstallStateAbsent
  1664.         Session.FeatureRequestState("TraceHelpCZ") = msiInstallStateAbsent
  1665.         Session.FeatureRequestState("CaptureHelpCZ") = msiInstallStateAbsent
  1666.         Session.FeatureRequestState("BarcodeHelpCZ") = msiInstallStateAbsent
  1667.         Session.FeatureRequestState("DrawPresetsCZ") = msiInstallStateAbsent
  1668.         Session.FeatureRequestState("RavePresetsCZ") = msiInstallStateAbsent
  1669.         Session.FeatureRequestState("PPPresetsCZ") = msiInstallStateAbsent
  1670.         Session.FeatureRequestState("DrawTutorsCZ") = msiInstallStateAbsent
  1671.         Session.FeatureRequestState("RaveTutorsCZ") = msiInstallStateAbsent
  1672.         Session.FeatureRequestState("PPTutorsCZ") = msiInstallStateAbsent
  1673.         If ((Session.Property("OSLANGUAGE") <> "CZ") And (Session.Property("ProductLanguage") <> "1029")) Then
  1674.             Session.FeatureRequestState("RequiredCZ") = msiInstallStateAbsent
  1675.             Session.FeatureRequestState("RegistrationCZ") = msiInstallStateAbsent
  1676.         End If
  1677.     End If
  1678. Else
  1679.     nRemoveVBACZ = 1
  1680. End If
  1681.  
  1682. If (nRemoveVBAEN = 1) And (nRemoveVBAPL = 1) And (nRemoveVBACZ = 1) Then
  1683.     Session.FeatureRequestState("VBAEN") = msiInstallStateAbsent
  1684. End If
  1685. If (IsFeatureSelected("DrawProgramFiles") = True) Then
  1686.     If (Session.Property("OSLANGUAGE") = "US") Then
  1687.         Session.FeatureRequestState("English") = msiInstallStateLocal
  1688.     Elseif (Session.Property("OSLANGUAGE") = "DE") Then
  1689.         Session.FeatureRequestState("German") = msiInstallStateLocal
  1690.     Elseif (Session.Property("OSLANGUAGE") = "FR") Then
  1691.         Session.FeatureRequestState("French") = msiInstallStateLocal
  1692.     Elseif (Session.Property("OSLANGUAGE") = "JP") Then
  1693.         Session.FeatureRequestState("Japanese") = msiInstallStateLocal
  1694.     Elseif (Session.Property("OSLANGUAGE") = "IT") Then
  1695.         Session.FeatureRequestState("Italian") = msiInstallStateLocal
  1696.     Elseif (Session.Property("OSLANGUAGE") = "ES") Then
  1697.         Session.FeatureRequestState("Spanish") = msiInstallStateLocal
  1698.     Elseif (Session.Property("OSLANGUAGE") = "BR") Then
  1699.         Session.FeatureRequestState("Portuguese") = msiInstallStateLocal
  1700.     Elseif (Session.Property("OSLANGUAGE") = "NL") Then
  1701.         Session.FeatureRequestState("Dutch") = msiInstallStateLocal
  1702.     Elseif (Session.Property("OSLANGUAGE") = "PL") Then
  1703.         Session.FeatureRequestState("Polish") = msiInstallStateLocal
  1704.     Elseif (Session.Property("OSLANGUAGE") = "CZ") Then
  1705.         Session.FeatureRequestState("Czech") = msiInstallStateLocal
  1706.     Elseif (Session.Property("OSLANGUAGE") = "AF") Then
  1707.         Session.FeatureRequestState("Afrikaans") = msiInstallStateLocal
  1708.     Elseif (Session.Property("OSLANGUAGE") = "CA") Then
  1709.         Session.FeatureRequestState("Catalan") = msiInstallStateLocal
  1710.     Elseif (Session.Property("OSLANGUAGE") = "DK") Then
  1711.         Session.FeatureRequestState("Danish") = msiInstallStateLocal
  1712.     Elseif (Session.Property("OSLANGUAGE") = "SU") Then
  1713.         Session.FeatureRequestState("Finnish") = msiInstallStateLocal
  1714.     Elseif (Session.Property("OSLANGUAGE") = "IS") Then
  1715.         Session.FeatureRequestState("Icelandic") = msiInstallStateLocal
  1716.     Elseif (Session.Property("OSLANGUAGE") = "NO") Then
  1717.         Session.FeatureRequestState("Norwegian") = msiInstallStateLocal
  1718.     Elseif (Session.Property("OSLANGUAGE") = "RU") Then
  1719.         Session.FeatureRequestState("Russian") = msiInstallStateLocal
  1720.     Elseif (Session.Property("OSLANGUAGE") = "SL") Then
  1721.         Session.FeatureRequestState("Slovak") = msiInstallStateLocal
  1722.     Elseif (Session.Property("OSLANGUAGE") = "SV") Then
  1723.         Session.FeatureRequestState("Swedish") = msiInstallStateLocal
  1724.     Elseif (Session.Property("OSLANGUAGE") = "TR") Then
  1725.         Session.FeatureRequestState("Turkish") = msiInstallStateLocal
  1726.     Else
  1727.         Session.FeatureRequestState("English") = msiInstallStateLocal
  1728.     End If
  1729. End If
  1730. '///////////////////////////////////////////////////////////////////////////
  1731. Function IsFeatureExists(sFeature)
  1732. On Error Resume Next
  1733.  
  1734.     Dim objDB: Set objDB = Session.Database
  1735.  
  1736.     Dim sQuery: sQuery = "SELECT * FROM `Feature` WHERE `Feature`.`Feature` = '" & sFeature & "'"
  1737.  
  1738.     Dim objView: Set objView = objDB.OpenView(sQuery)
  1739.     objView.Execute
  1740.  
  1741.     Dim objRec: Set objRec = objView.Fetch
  1742.  
  1743.     If (objRec Is Nothing) Then
  1744.         ' not there
  1745.         IsFeatureExists = 0
  1746.     Else
  1747.         ' there
  1748.         IsFeatureExists = 1
  1749.     End If
  1750.  
  1751. End Function
  1752.  
  1753. '*********************************************************************************************
  1754. '    Function:    getFeatureAction(sFeature)
  1755. '
  1756. '    Args:        STRING sFeature = `Feature`.`Feature`
  1757. '
  1758. '    Returns:    The current install state of the feature
  1759. '
  1760. '*********************************************************************************************
  1761. Function getFeatureState(sFeature)
  1762. On Error Resume Next
  1763.     getFeatureState = Session.FeatureCurrentState(sFeature)
  1764. End Function
  1765.  
  1766. '*********************************************************************************************
  1767. '    Function:    getFeatureAction(sFeature)
  1768. '
  1769. '    Args:        STRING sFeature = `Feature`.`Feature`
  1770. '
  1771. '    Returns:    The requested action of the feature
  1772. '
  1773. '*********************************************************************************************
  1774. Function getFeatureAction(sFeature)
  1775. On Error Resume Next
  1776.     getFeatureAction = Session.FeatureRequestState(sFeature)
  1777. End Function
  1778.  
  1779.  
  1780. '*********************************************************************************************
  1781. '    Function:    IsFeatureSelected(sFeature)
  1782. '
  1783. '    Args:        STRING sFeature = `Feature`.`Feature`
  1784. '
  1785. '    Returns:    True \ False
  1786. '
  1787. '    Notes:        Determines if a feature is selected for install
  1788. '*********************************************************************************************
  1789. Function IsFeatureSelected(sFeature)
  1790. On Error Resume Next
  1791.     Dim nState: nState = getFeatureState(sFeature)
  1792.     Dim nAction: nAction = getFeatureAction(sFeature)
  1793.  
  1794.     If ((nAction > msiInstallStateAbsent) Or ((nState > msiInstallStateAbsent) And (nAction = msiNoAction))) Then
  1795.         IsFeatureSelected = True
  1796.     Else
  1797.         IsFeatureSelected = False
  1798.     End If
  1799.  
  1800. End Function